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PART I 



RELEASE SUiVUVlARY 



RTS V2.0 RELEASE SUMMARY 



1.1 PRODUCTS 

Version 2. of the Real-Time SCOPE (RTS) Operating System is accompanied by the following 
product set members. 

3100/3200 ADAPT Version 1. 1 

3100/3200/3300 BSIPP Version 2.2 

3100/3200 (BCD) COBOL Version 3.0 

3300 (BDP) COBOL Version 2. 

3300 COMPASS Version 2. 

3100/3200 COSY Version 2. 

3200 FORTRAN Version 3.0 

MSOS/RTS Error Recovery Routines Version 1. 1 

3100/3200 PERT Cost Version 2.1 

3100/3200 PERT Time Version 2. 1 

Report Generator Version 1. 1 

SAESTT Version 2.3 

SCOPE UTILITY Version 1.4 

3100/3200/3300 SIPP Version 2.2 

TAPE SORT/MERGE Version 3. 

1.2 MATERIALS 

Package A 

Two tapes (COSY tape 1 and COSY tape 2) contain the RTS routines in COSY format. 

Binary release tape for use in Installing RTS contains the following files. 

File 1 Interim library PRELIB source 

File 2 Standard PRELIB source 

File 3 Batch PRELIB source 

File 4 BDP COBOL PRELIB source 

File 5 512 initiator binary 

Package B 

One tape for 16K variant of PERT Time. 



OiJCOH)K>Un 



Package C 

One tape for 32K variant of PERT Time. 
Package D 

One tape for PERT Cost. 
Package E 

One tape for 16K variant of ADAPT. 
Package F 

One tape for 32K variant of ADAPT. 
Package G 

Changes for MMTC in the following form: 

COSY changes for CIO 

COSY changes for xCICRECl (x= S or B) 

COSY changes for RDUMP 

COSY changes for PRELOAD 

COSY changes for LOADER 

COSY changes for POST LOAD 

COSY changes for ERROR RECOVERY 

COSY formatted deck of DRIVMMTC 

COSY formatted deck of MMTCINIT 

Binary deck of MMTCINIT 
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Cosy Tape 1 



RTS 
Routines 



FORTRAN 
Routines 



Utility 
Routines 



COMPASS 
Routines 



Error 

Recovery 

Routines 



SAINT 



SORT 
Routines 



BCD 

COBOL 

Routines 



FILE STRUCTURE 
Cosy Tape 2 



COMAC 



BDP 

COBOL 

Routines 



COSY 
Routines 



Report 

Generator 

Routines 



Binary Release Tape 



File 1 
Interim Library 

PRE LIB Source 


File 2 
Standard 
PRELIB Source 


Files 
Batch 

PRELIB Source 


File 4 
BDP COBOL 
PRELIB Source 


Files 

Control Data 

512 Printer 
Initiator 
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1.3 NEW FEATURES 

1.3.1 RTS 

Standard error recovery improves recovery from I/O errors and types standardized error 
diagnostics on CTO. 

RTS no longer aborts arbitrarily; it passes control to the error recovery routines. 

All system mess^es are in the standard format established by RTS/MSOS. 

Installations at the required FCO levels can incorporate channel transmission parity error 
recovery. 



ControUer t 

3127 
322x 
3245 
3248 
3256 
342x 

3446 

3447A 

3447B 

362xA 

362xB 

3637A 

3644 

3649 

3659 



FCO Level 

CA 18730 
CA 19640 
CA 18690 
CA 18691 
CA 19192 
CA 17773 
CA 18927 
CA 18731 
CA 18926 
CA 19639 
CA 19525 
CA 17759 
CA 18689 
CA 18688 
CA 18945 



A memory allocation map is printed whether loading is successful or unsuccessful. 

A BATCH program may now terminate abnormally without a dump. 

Standard driver for the Modular Magnetic Tape Controller [3518(lx8)/3528(2x8)] and the 657/659 
Tape Transports. 



■♦■The controllers listed are registered equipment of Control Data Corporation. 
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When the program requests release of a nonexistent file, an informative (I) message is typed and 
the job continues rather than aborting, as occurred in previous versions. 

RTS attempts to release a not-ready tape unit. If the unit is not released on the first attempt, 
control passes to the next job in the stack instead of looping in the unit release procedures. 

Installation options include: 

Stacking of clock interrupt requests. 

A basic system accounting routine (requires clock interrupt option). 

Detection of lost interrupts with the timeout routine (requires clock interrupt option) . 

A BATCH-only system. 

The CONTROL DATA® 512 Train Printer can be incorporated. Optionally, the programmer or 
operator can load the 512 Train Printer image memory with a specified buffer at inter-job time. If 
this option is selected, the buffers are established according to user trains at the time of 
installation. 

1 lie printer uriver contains carnage contrOi. Cuaracter jn lO scaCCc aui^v^ ^c^-ge ^^jv^Ci- d-ix^^ v^iict.j.ct.%^L\^x v^ 
to suppress auto page eject. 

The identification card for DUMP is changed to RDUMP to maintain system consistency. The 
control card UNIT, 55, DUMP in the PRELIB source tape is changed to UNIT, 55, RDUMP. 

JOB and EOF cards now contain distinctive multiple punches. 




D0-7T IMIO 



liUZ;iYUUU 



/ 




I 




*.Vl 


1 

ORE 


CO 


UNT 


(H 


F) 


)R 


rypi 




4i: 


DC 


1 

42;fPT 


4j; 


m_ 


1 

44:tra 


1 

451 LRL 


' LI LI L 1 J 

i-4o:rif 5o:main si:wEtiAr sitmai 


1 

54; LED 


55: 


;xs 
















2 s 

o 


S P 


I • 


J id 


11 II 


B 14 


li l( 


11 11 


1^ ?r 


-1 !! 


13 24 


ii?-. 


21 ;j !9^0 




1114 


b5 36 l?3gbs« 








41 W 


V V 




V. ',« 


S7 51 


stiifl 


fil fi? 


fi,U* 


a IS u u H » 


I- ?- 


73 74 


nn 


7? 73 n 80 






















iiiiirnTr 


liiiiihihi 














1 






















^if 


n 


'V^r 


i%" 


■t 


•% 


: 


4 


AB 


CD 


EF 


G 


H 


I < 


. ) 


oh 


- 


JK 


LM 


Ne 


p 





RV 


♦* 


t» 


> 


b 


/s 


TU 


vw 


x 


Y 


Z J 


, I 


*= 


A 
















































1 














1 
























n 








































1 














1 


























7. 


(J 

















~ 





1 


P 


ii 


p 


" 


® 


— k2) 









i 


" 


» 


-p 


^ 


K 


i 







^ 




(y) 









e> 






?° > 










































1 






'^£ 


■ 


ii 






















^2 


m 








































1 




li 


^1 




h^ 


















1 










































1 




Tl 




3 


i 


a 


i 


















1 

a. 


I' 






















II 


II 


mi 


1 


II nil 11 11 




m^ 
























1 


! 5 < 


i G 


, 1 


!l to 


II 1! 


11 H 


15 M 


ITU 


n» 


nM 


11 H 


a a 


nit 


n» >i u 


u» 


H X i; 11 » X <: n 41 H « n ijii Ja shi s<k'. Mb »l»Jti iiici will X hIe! 711 


n p. 


T3 74 


n.. 


17 UTS M 








^ 




050 


4f9 


_„ 






^ 








^^ 


■M 


DD- 


ZT 1 


W5C 












i_ 




_ 




__ 




_ 






mm, 






■M 


^ 




^ 




^ 



The user can now define l-37g different hardware types, as compared to 13g in previous releases. 

Priority programs can use the overlay processor; overlay processor (OVPRO) uses only magnetic 
tape. 

The CONTROL DATA® 915 Optical Character Page Reader driver can be incorporated. 

The CONTROL DATA® 3691 Paper Tape Reader Punch can be incorporated. 

RTS recognizes the REPEAT button on the console typewriter for all statements from the 
operator. 

Entry points and external names are blocked 10 to 12 names per line on the output records of 
PRELIB. 

Values for MEMORY and MEMORYE are printed on MAP. 

The operator can release the standard PUNCH so that jobs can be run even if the punch is down. 

The system checks parity on all absolute records on the library tape including BOOT. 

The ENDSCOPE card includes three parameter choices. 

^ENDSCOPE,^ 

N Rewind INP, but not OUT and PUN 

R Rewind INP, OUT, and PUN, but not unload 

(neither) Rewind and unload INP, OUT, and PUN 



1-1-6 



60237000 



The CTO card includes three parameter choices, 

7 T 

gCTO.L message 

T Card logged only on CTO 

L Card logged only on standard OUT 

(neither) Card logged on both CTO and standard OUT 

RTS has improved ready message handling and allows the operator to ready the unit through manual 
interrupt. 

At autoload time, the operator can gain typewriter control by typing CFO and pressing FINISH in 
response to the TIME request. 

The system provides improved overhead when generating overlay programs. 

1.3.2 ERROR RE CO VERY 

The error recovery routines facilitate hardware recovery from I/O errors. These routines are 
incorporated into variable resident. Their use by the loader, postload, and RDUMP is optional, 
permitting the installation to omit them if saving core is more desirable than the error recovery 
routines. The operator communicates with the error recovery routines through manual interrupt 
procedures. 

1.3.3 COMPASS 

OVERLAYl allows random placement of the following cards without interfering with the processing 
of LIBM and JVL-VCRO cards. 

comment cards 

REM 

TITLE 

SPACE 

EJECT 

COMPASS cards use the F parameter to force execution of the load-and-go output regardless of 
assembly errors. The F parameter has the same form as the X parameter and requires RTS 
control cards ^lOAD,56 and ^RUN. 

Standard error recovery improves recoverj' from I/O errors and types standardized error 
diagnostics on CTO. 
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COMPASS attempts to continue assembly even when irrecoverable I/O errors occur. Execution is 
omitted even if the F parameter is specified. 



1.3.4 FORTRAN 

Standard error recovery improves recovery from I/O errors and types standardized error 
diagnostics on CTO. 

The user can generate Hollerith constant strings in the following manner. 

DATA(MESSAGE=21H THIS IS A BCD STRING) 

The user can incorporate a single branch logical IF statement into the compiler. 

The user can dimension in all TYPE statements except TYPE other. 

A label can be used after a $ on a multistatement card. 

The user can modify UNITSTF to test for EOT. 

The DATA statement allows insertion of specific values into the COMMON/DATA area at compile 
time. This has been expanded to include the program variables area. 

Parameters on the 'FORTRAN card can now be equated to specific logical units (e.g. , 

7fORTRAN,L=04,I=03,A=05,X=06,P=07). If the equate option is not used, parameter assignment 
9 . . ^ .^^^ 

The qFORTRAN card can include an M parameter to select a memory map showing the relative 
memory location of each variable and statement within a subprogram. 

In a FORTRAN data statement, a simple floating-point variable previously defined by a dimension 
statement may be preset to 1-8 Hollerith characters. 

1. 3.5 BCD AND BDP COBOL 

Standard error recovery improves recovery from I/O errors and types standardized error 
diagnostics on CTO. The compiler attempts to complete compilation even when irrecoverable 
errors occur on output units, as long as an output option exists. The operator can optionally dump 
bad input blocks on a previously equipped unit during object time execution. 

COBOL loading diagnostics are written on both OUT and CTO. 
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1.3.6 COSY 

The D parameter on a COSY card can be used to change the names of COSY decks. 

All COSY output from this version of COSY is in 3300/3500 COSY format. The output cannot be 
used with previously released COSY, but output from previously released COSY can be used with 
the COSY in this release. 

The S parameter on a ^COSY card suppresses the job when a revision card sequence error is 
found . 

Standard error recovery improves recovery from I/O errors and types standardized error 
diagnostics on CTO. 

1.3.7 TAPE SORT 

Standard error recovery improves recovery from hardware errors and types standardized error 
diagnostics on CTO. 

The numeric BCD sign is carried as the upper two bits of the least significant character in the 
field for collating sequence number 5. 

Setting SORTK enables the library and the input unit to share a unit in SORT. This facilitates the 
use of only three tape drives to run a polyphase sort. 



1.3.8 BSIPP 

The block count for a labeled tape is edited into the trailer label. 

The accounting for record input and output is increased from four to eight digits. 

The system now types two messages. The first determines the maximum number of operations 
possible with the core storage available. 

NO. OF OPS POSSIBLE = xx 

The second determines the maximum number of operations allowed with the equipment available. 

NO. OF OPS ALLOWED = xx 

1.3.9 SIPP 

The block count for a labeled tape is edited into the trailer label. 
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The accounting for record input and output is increased from four to eight digits . 

The system now types two messages. The first determines the maximum number of operations 
possible with the core storage available. 

NO, OF OPS POSSIBLE = xx 

The second determines the maximum number of operations allowed with the equipment available. 

NO. OF OPS ALLOWED = xx 

1.4 MODIFICATIONS AND CORRECTIONS 

1.4.1 RTSV2.0 OPERATING SYSTEM 

PSR's incorporated: 



509 


1315 


566 


1324 


570 


1326 


572, 857 


1393 


577, 1096 


1415 


606 


1462 


615, 1118 


1485 


645 


1539 


704 


1540 


743 


1573 


744 


1604 


747 


1614 


766 


1658 


831 


1710 


832 


1748 


835 


1780 


847 


1841 


1053 


1854 


1054 


1856 


1086 


1881 


1136 


1988 


1189 


2253 


1244 


2283 




2348 
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1.4.2 FORTRAN 
PSR's incorporated: 



599 


1580 


2092 


605 


1600 


2115 


608 


1607 


2141 


659 


1608 


2164 


813 


1626 


2170 


817 


1646 


2186 


821 


1685 


2189 


928 


1686 


2190 


962 


1692 


2191 


1024 


1693 


2203 


1069 


1716 


2209 


1070 


1728 


2245 


1169 


1768 


2264 


1234 


1773 


2289 


1248 


1774 


2290 


1253 


1785 




1321 


1788 




1352 


1817 




1360 


1830 




1433 


1842 




1503 


1858 




1530 


1874 




1567 


1887 




1578 


1997 
2030 
2034 
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1.4.3 COMPASS 

PSR's incorporated: 

597, 1818 (both superseded by PSR 2255) 

703 

753 

932 

948 

1355 

1537 

1812 

1813 

1893 

2049 

2068 

2136 

2196 

2243 

2252 

2255 

2287 

2288 

2295 

2491 
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1.4.4 COSY 

PSR's incorporated: 

662 

830 

1356 

1467 

1504 

1575 

1576 

1599 

1623 

1727 

1787 

1851 

1940 

1972 

1985 

2008 

2037 

2091 

2254 

2349 

2410 

2422 

2465 

1.4.5 SAINT 

PSR's incorporated: 

2032 
2033 



1.4.6 COBOL-33 V2. (BDP) 
PSR's incorporated: 



208 


725 


209 


729 


212 


814 


216 


848 


476 


849 


485 


854 


541 


1057 


575 


1075 


612 


1080 


626 


1122 


643 


1162 


644 


1294 


673 


1323 


674 


1482 


675 


1484 


699 


1602 


707 


1660 


708 


1746 




1690 




2262 




2299 




2285 




2273 
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1. 4. 7 COBOL V3. (BCD) 
PSR's incorporated: 



184 


725 


185 


825 


190 


848 


191 


849 


208 


1057 


209 


1075 


212 


1078 


216 


1079 


414 


1159 


476 


1162 


485 


1294 


541 


1323 


545 


1482 


575 


1484 


612 


1602 


626 


1660 


644 


1690 


675 


1746 


699 


2262 


707 


2299 


708 


2285 




2273 



1.4.8 TAPE SORT V3. 
PSR's incorporated: 



53 


868 


1359 


1543 


1635 


1799 


1861 


1946 


56 


950 


1422 


1544 


1637 


1800 


1862 


1965 


63 


954 


1449 


1554 


1638 


1801 


1863 


1969 


469 


1093 


1488 


1590 


1661 


1802 


1873 


2005 


470 


1114 


1525 


1595 


1662 


1807 


1890 


2013 


473 


1121 


1526 


1606 


1670 


1822 


1891 


2026 


474 


1148 


1533 


1624 


1749 


1832 


1898 


2042 


748 


1243 


1534 


1625 


1796 


1853 


1932 


2105 


793 


1270 


1540 


1631 


1797 


1859 


1941 




808 


1272 


1541 


1634 


1798 


1860 


1952 
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1.4.9 BSIPP V2.2 

PSR's incorporated: 

1308 (1317) 

1374 

1375 

1377 

2743 

1.4.10 SIPPV2.2 

PSR's incorporated: 

1019 (1341) 
1048 (1154) 
1049 
2743 
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1.5 DEFICIENCIES 

The following describes the deficiencies and limitations in the system and products of this release 
and, when possible, the corrective code or the corrective action to employ when the difficulties 
occur. 



1.5.1 RTS TAPE SORT 

Two searches of the library are required to load the internal Sort phase of Tape Sort. 



1.5.2 FORTRAN 

A label after $ on a multi-statement card causes a diagnostic: 

D FTNC 0514 DETECTED AT STATEMENT NO. n CANNOT IDENTIFY STATEMENT TYPE. 
STATEMENT NAME MISSPELLED OR MISUSED OR AN EQUAL SIGN IS MISPLACED. 



1.5.3 REPORT GENERATOR 

Report generator does not run under BDP COBOL because the design of report generator assumes 
BCD hardware or sim.ulatiDn. 



1.5.4 BCD AND BDP COBOL 

Omitting the END PROGRAM and FINIS cards in a COBOL source deck or placing a binary card 
between the COBOL control card and the end of the source deck causes the compiler to loop. 

Extraneous diagnostics may result when several errors are diagnosed in compiling a source 
statement. If non-numeric literals are involved, extraneous characters may be generated and 
later diagnosed as invalid. 

The object time package GPIO does not call error recovery for the display routine. A program 
using display will loop if the unit is not ready. 



1.5.5 ADAPT VERSION 1.1 

Detection of errors in the creation of the overlay tape may result in bypassing CLTAPE printout 
for the 16K variant. 
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1.6 LIMITATIONS 



1. 6. 1 RTS VERSION 2. OPERATING SYSTEM 

It is no longer possible to define several different origins within a record to be absolutized for 
PRELIB; a record card must be followed by only one origin card. 

RTS does not recover from channel parity errors on the 3256/3659 printer controllers. This is 
because no external equipment reply is generated by either controller when a chaimel parity error 
occurs. 

If a card reader feed-fail occurs with the 3248 controller, recovery is successful if CIO uses the 
TIMEOUT feature. The 3248 generates an external interrupt if feed-fail occurs; however, it 
does not physically interrupt the CPU, In this case, TIMEOUT provides the external interrupt 
which forces a cheek of the card reader and then forces the card reader to clear. The user that 
doesn't use TIMEOUT cannot recover because no external stimulus is provided. 

When logical units 55 and 56 are being equipped, RTS does not check for the presence of a write 
ring. 

The length of POSTLOAD can never be greater than the length of the loader; therefore, if 
POSTLOAD has error recovery, both the loader and OVPRO must have error recovery. 

Character I/O will not be allowed on 659 Tape Transports. The following JVIMTC status bits will 
be edited to the existing parity bit in the UST type status: 

parity errors 
phase encoded errors 
cyclic redundancy errors 
memory flag bit errors 

The standard driver for the MMTC must be installed as an add-on in card form as the current 
and interim systems do not have tiie ability to handle MMTC/65x. 



1. 6. 2 COMPASS VERSION 2. 

COMPASS does not allow loactand-go execution if irrecoverable l/O errors occur, even if the F 
parameter is selected on the COMPASS card. 

1.6.3 REPORT GENERATOR 

The report generator package does not execute on a 3300 or 3500 Computer System equipped with 
BDP hardware. 
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1.6.4 TAPE SORT 

The density of the shared tape drive must be manually set when using SORTK. 

When an error occurs, the error recovery routines have control until recovery is effected or the 
operator replies either A or D, If the operator types in an A response, control returns to SORT 
and the option selected on the control card is executed. 

1.6.5 SIPP 

SIPP functions which use tape parity (even or odd) to determine the mode in which data is recorded 
(BCD or Binary) will not perform correctly with nine track tape transports (MMTC/659). 

1.6.6 BSIPP 

BSIPP functions which use tape parity (even or odd) to determine the mode in which data is recorded 
(BCD or binary) will not perform correctly with nine track tape transports (MMTC/659). 

1.6.7 SCOPE UTILITY 

SCOPE Utility functions which use tape parity (even or odd) to determine the mode in which data 

is recorded (BCD or binary) will not perform correctly with nine track tape transports (MMTC/659). 



1.7 PUBLICATIONS 

The following pviblications are relevant to the use of RTS product set. 

Control Data Publications 
3100/3200/3300/3500 RTS Reference Manual 
3100/3200/3300/3500 RTS Operator's Guide 
3100/3200/3300/3500 COMPASS Reference Manual 
3100/3200/3300/3500 FORTRAN Reference Manual 
3100/3200/3300/3500 COSY Reference Manual 
3100/3200/3300 SIPP Bacl^round Operator Reference Manual 
3100/3200 SIPP Reference Manual 
3100/3200/3300 COBOL Reference Manual 



Pub. No. 
60172500A 
60170200 
60236800 
60057600C 
60207300A 
60190200 
60130400A 
60132000 
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3100/3200/3300 COBOL V2. Extension and Revisions ADB 60137600 

3100/3200/3300 SCOPE UTILITY Reference Manual 60130200 

3100/3200/3300/3500 ADAPT Reference Manual 60173400 

3100/3200/3300 PERT/TIME Reference Manual 60131100 

3100/3200/3300 PERT /COST Reference Manual 60132500A 

3100/3200/3300/3500 SAINT Reference Manual 60213700 

3100/3200/3300/3500 Tape SORT/MERGE/MSOS Reference Manual 60059700A 

3100/3200/3300/3500 RTS/MSOS Diagnostic Handbook 60236700 
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PART II 



INSTALLATION PRCKEDURES 



INSTALLATION OVERVIEW 



Capsulized installation procedures summarize the steps necessary to prepare the RTS interim and 
final libraries. Before attempting installation, it is essential that the user be completely familiar 
with the detailed installation procedures. 



1.1 CAPSULrZED INSTALLATION PROCEDURES 

The PRELIB deck obtained from file 1 of the binary release tape may be used as standard INP or it 
may be punched on an RTS or Tape SCOPE library. Execute this deck using the existing RTS or 
Tape SCOPE as the input library to obtain a new library containing the special PRELIB. The new 
library is written on logical unit 1 and contains the operating library for final library preparation. 



buz;ivuuu 



DETAILED INSTALLATION PROCEDURES 



The installation procedures for RTS and its product set are organized into four sections. Through- 
out these procedures certain parameters are site dependent and must be supplied by the user. 
Therefore, the user must read the procedures completely and prepare all materials before attempt- 
ing installation. 

Division of installation procedures: 

Hardware Initialization 
Deck Preparation 
Final Library Generation 
Post Generation Information 



2.1 HARDWARE INITIALIZATION 

2.1.1 AUTOLOAD ROUTINE 

An autoload routine in the autoload region of core must be manually established for each installation. 
This routine is a basic, permanent machine entry used to Initiate tape operations (part III, 
section 1). 



2.1.2 512 INITIALIZATION 

The image memory of the 512/3555 must be loaded before print operations can be executed. When 
loading the 512/3555 image memory, use the following instructions: 

1. The one card loader 

Punch the one card loader (section 4.5) and define the appropriate channel and equip- 
ment of the card reader. 

C EQU n 

n Channel (0-7) of the card reader 
EUUU EQU mmmm 

mmmm 12-bit connect code for the card reader 

For example: Assume a card reader configuration of channel 0, equipment 2, imit 0. 
C, EUUU would be as follows: 

C EQU 

EUUU EQU 2000g 



buiiavuuo 



-2-1 



2. The image initiator program contains the individual train images and several sub- 
routines that extract the configuration of the 512 and write the memory image. 

Place the one card loader in the card reader, followed by the library deck of the image 
initiator. Autoload from the card reader. The following is typed: 

512 IMAGE INITIATOR 
T(l) = 595-1 (501 COMPATIBLE) or 
T(2) = 595-2 (AN COMPATIBLE) or 
T(3) = 595-3 (HN COMPATIBLE) 

512 =■ CcEeUuu 

Type the appropriate channel, equipment, and unit of the 512. Upon completion, the 
user must define the train in response to the following typeout: 

TRAIN = T( 

Answer by typing digit 1, 2, or 3 as defined above. 

Upon completion of initialization the following message is received, and the 512 is ready 
for use. 

IMAGE INITIATED 

2.2 PRELIB DECK MODIFICATION 

The PRELIB source, whether punched or supplied, requires modification before the final RTS 
library generation can proceed. The modification procedures are divided into five subsections. 

System installation-dependent routines 

Error recovery assembly options 

Product set assembly and options 

Replacement card 

Unit card 

BCD, BDP, and FDP options 

Driver selection 
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2.2.1 INSTALLATION-DEPENDENT ROUTINES 

The following routines must be modified according to each particular hardware configuration. 
Several procedures apply to all systems; others apply only to standard (STD) or BATCH RTS. 

STD BATCH 

CIO BCIO 

SCICRECl BCICRECl 

RDUMP RDUMP 

PRELOAD PRELOAD 

LOADER LOADER 

OVPRO OVPRO 

POST LOAD POSTLOAD 



CIO MODIFICATIONS (STD) 

If the lost interrupt timeout feature is desired, select the following option: 

DELETE/ 3 

TIMEOUT EQU 1 

The current value of TIMEOUT is 0. If the timeout option is selected, the clock option (SCICRECl) 
must also be selected. 

CIO DECK/ pj.pg,... 

BCIO MODIFICATIONS (BATCH) 

If the lost interrupt timeout feature is desired, select the following option: 

DELETE/ 3 

TIMEOUT EQU 1 

The current value of TIMEOUT is 0. If the timeout option is selected, the clock option (BCICRECl) 
must also be selected. 



BCIO DECK/ pi,P2,... 
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SCICRECl (STD) 

SCICRECl is a resident program containing tables and various resident subroutines (manual 
interrupt processor, central interrupt control, etc.) for a standard RTS library. SCICRECl 
contains the description of the hardware environment and must be updated to reflect the particular 
hardware configuration (part III, section 2). All options in this release are set to unless other- 
wise specified. 

Accounting Option : If the basic job accounting feature is desired, select the following option: 

DELETE/ 4 

ACCT EQU 1 

The current value of ACCT is 0. 

If the accounting option is selected, the clock interrupt processor option must also be selected. 

BDP Option : (3300 users with a CONTROL DATA® 3312 Business Data Processing Module) 

If a library with the capability of handling BDP instructions is desired in an installation, make the 
following modification: 

DELETE/ 5 
BDP EQU 1 (If BDP hardware is present) 

This change must be made if the BDP hardware option is included in the PRELIB source deck. 
The current value of BDP is 0. 

Clock Interrupt Processor Option : If it is desirable to have the clock interrupt processor 
available for programmer use in an installation, make the following modification: 

DELETE/ 6 
CLOCK EQU 1 

The release value of CLOCK is 0. 

If the timeout feature has been selected (CIO), the clock option must also be selected. 

CST and EST Modifications : The CST and EST are established by control parameters . 

DELETE/ 7 
NCHANS EQU n 
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In all cases, n depends on available channels indicated in the following table. The current value of 
n is 6. 



Highest Available 
Channel Number 


Value of 
n 


1 


2 


2 or 3 


4 


4 or 5 


6 


6 or 7 


8 



Memory Limits: The machine capacity must be properly recorded within SCICRECl. These 
memory limits are used by the system loader when loading a program for execution. 

On the released COSY tape, the cells are set for 32K CONTROL DATA® 3200/3300 Computer 
Systems. They must be changed for the CONTROL DATA® 3100 Computer System. The COSY 
correction is: 

DELETE/ 8 
MAXCORE EQU value 

The S3mibol value is: 



Machine Type 


16K Value 


32K Value 


3100/3150 


376378 


776378 


3200/3300 


377378 


777378 



The current setting of value is 77737g 

AET Entries : At installation time, the AET must be defined to describe the equipment available to 
the system. This section describes only the changes to be made in standard RTS. A general 
description of AET is in part in, section 2. 

DELETE/ 2033,2061 

THE AET DESCRIPTION 
FOLLOWS 

RHT Modification : The RHT defines the equipment used during a batch run and equipment assigned 
as system units (PUN, INP, OUT, etc.). The complete description is in part HI, section 3.1. The 
following entry must be made for modifications. 



DELETE/ 



RHT 



2126,2132 
modifications 
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BRHT Modification : The BRHT (Priority Running Hardware Table) is similar to the RHT but has 
only logical units 1-49, 58, and 59 available for reference by a priority program. A complete 
description is in part III, section 3,2. The following entry must be made for modifications. 

DELETE/ 2140,2143 

BRHT modifications 

CIT Modification : The CIT must be modified in order to establish the appropriate channels available 
to the input/output system. 

DELETE/ 2210, 2217 

00 X ch 

00 X ch 1 

00 X ch 2 

00 X ch 3 

00 X ch 4 

00 X ch 5 

00 X ch 6 

00 X ch 7 

X lOIP, if channel is available as system channel defined in AET. 
ABINRT, if channel is not available. 

System Interrupt Mask: A mask contained in SCICRECl reflects the channels available for system 
use. The COSY correction for the mask is: 

DELETE/ 2253 
SYST.IOM OCT h 

Proper channel description for the system interrupt mask is represented by h; the current value of 
h is 173. 

The general format of the mask word is: 

23 07 06 05 04 03 02 01 00 





=7 


^=6 


^5 


C4 


=3 


^2 


^1 


^0 



cj Bit corresponding to channel 1. 

If the channel is available to the system. Its corresponding bit is set to 1. If the chaimel is not 
available, it is set to 0. The dedicated channels or the channels reserved for special applications 
are not represented. They are set to 0. 
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The deck card for these changes is: 

SCICRECl DECK/ Pi>P2--- 

BCICRECl (BATCH) 

BCICRECl is a resident program containing tables and various resident subroutines (manual inter- 
rupt processor, central interrupt control, etc.) for a BATCH RTS library. BCICRECl contains the 
description of the hardware environment and must be updated to reflect the particular hardware 
configuration. All options in this release are set to 0, unless otherwise specified. 

Ac counting Option: If the basic job accounting feature is desired, select the following option: 

DELETE/ 4 

ACCT EQU 1 

The current value of ACCT is 0. 

If the accounting option is selected, the clock interrupt processor (CIP) option must also be 
selected. 

BDP Option: (3300 users with a CONTROL DATA® 3312 Business Data Processing Module) 

If a library with the capability of handling BDP instructions is desired in an installation, make the 
following modification: 

DELETE/ 5 

BDP EQU 1 (If BDP hardware is present) 

This change must be made if the BDP hardware option is included in the PRELIB source deck. The 
current value of BDP is 0. 

. Clock Interrupt Processor (CIP) Option: If it is desirable to have the clock interrupt processor 
Available for programmer use in an installation, make the following modification. 

DELETE/ 6 

CLOCK EQU 1 

The release value of CLOCK is 0. 

If the timeout feature has been selected (BCIO) , the clock option must also be selected. 
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CST and EST Modifications : The CST and EST are established by control parameters. 

DELETE/ 7 

NCHANS EQU n 

In all cases , n is dependent on available channels indicated in the following table. The current 
value of n is 4. 



Highest Available 
Channel Number 


Value of 
n 


1 


2 


2 or 3 


4 


4 or 5 


6 


6 or 7 


8 



Memory Limits : The machine capacity must be properly recorded within BCICRECl. These 
memory limits are used by the system loader when loading a program for execution. 

On the released COSY tape, the cells are set for 32K 3200/3300 Computer Systems. They must be 
changed for all 16K and 3100 Computer Systems. The COSY correction is: 

DELETE/ 8 

MAXCORE EQU value 

The symbol value is : 



Machine Type 


16K Value 


32K Value 


3100/3150 


376378 


776378 


3200/3300 


37737g 


777378 



The current setting of value is 777378. 

lOT Modification : The lOT (I/O Table) must be modified to establish the appropriate channels 
available to the input/output subsystem. 
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lOT 



DELETI 


:/ 703,710 




00 


X 


chO 


00 


X 


chl 


00 


X 


ch2 


00 


X 


eh 3 


00 


X 


ch4 


00 


X 


ch5 


00 


X 


ch6 


00 


X 


ch7 



X lOIP, if channel is available as a system channel defined in the AET. 
ABINRT, if channel is not available. 

AET Entries: At installation time, the AET must be defined to describe the equipment available to 
the system. This section describes only the change made in BATCH RTS. A general description of 
AET is in part in, section 2. 

DELETE/ 1306,1326 

THE AET DESCRIPTION 
FOLLOWS 

RHT Modification: The RHT defines the equipment used during a batch run and equipment assigned 
as system units (PUN, INP, OUT, etc.). The complete description is in part in, section 3. 1. The 
following entry must be made for modification. 

DELETE/ 1391,1397 

RHT modification 

System Interrupt Mask: A mask contained in BCICRECl reflects the channels available for system 
use. The COSY correction for the mask is: 

DELETE/ 1438 
SYST. lOM OCT h 

Proper channel description for the system interrupt mask is represented by h; the current value 
of h is 178. 
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The general format of the mask word is: 

23 07 06 05 04 03 02 01 00 





Crj 


H 


C5 


H 


H 


C2 


Cl 


CO 



c^ Bit corresponding to channel i. 

If the channel is available to the system, its corresponding bit is set to 1. If the channel is not 
available, the corresponding bit Is set to 0. 

The deck card for these changes is: 

BCICRECl DECK/ Pi,P2,-.. 

RDUMP (STD/BATCH) 

Standard Error Recovery : If use of the standard error recovery on the RDUMP input/output 
functions is desired, select the following option: 

DELETE/ 21 
SER. OPT EQU 1 

The release value of SER. OPT is 0. The RDUMP deck on the PRELIB sources has SER. OPT set 
to 0. If SER. OPT is set to 1, the error recovery equates TAPE, CARDRDR, CARDPNCH, 
PRINTER, ATTMPTl, ATTMPT2, BKSPLIM2, NOATMPTS, MAXERASE, and CKSMCNST are 
valid (section 2. 2.2). 

The deck card for these changes is: 

RDUMP DECK/ p^ , Pg , . . . 

PRELOAD (STD/BATCH) 

BATCH Only Option : If the BATCH only variant is desired, select the following option: 

DELETE/ 8 

BF EQU 1 

The current value of BF is 0. The PRELOAD deck on the BATCH PRELIB source has BF set to 1. 
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512 Train Option : If the configuration contains a 512 Train Printer and the user desires the atailiiy 
to change the trains, select the following option: 

DELETE/ 130 
TRAIN EQU 1 

The current value of TRAIN is 0. 

Users with a 595-1 63 character 501 compatible train must set the following: 

DELETE/ 181 

TRN5951 EQU 1 

Users without a 595-1 should leave TRN5951 set to 0. Users with a 595-2 48 character AN train 
must set the following: 

DELETE/ 182 
TRN5952 EQU 1 

Users without a 595-2 should leave TRN5952 set to 0. 

Users with a 595-3 48 character HN train must set the following: 

DELETE/ 183 

TRN5953 EQU 1 

Users without a 595-3 should leave TRN5953 set to 0. Users with additional trains (up to 9), must 
add the following: 



Example (Add 


s 2 special trains): 






INSERT/ 


634 






ENA 


BUF 595x 






ENA 


BUF 595y 




BUF 595x 


OCT 


144 word buffer 




BUF 595y- 


OCT 


144 word buffer 






DELETE/ 


2822 






ASG 


n (n = Train number + 


1) 



Current value is 4. 



fin5f?7nnn 



Accounting Option : If the basic job accounting feature is desired, select the following option: 

DELETE/ 131 
ACCT EQU 1 

The current value of ACCT is 0. The value of ACCT must match value of ACCT in xCICRECl. 

The deck card for these changes is: 

PRELOAD DECK/ p^^.Pg,... 

LOADER (STD/BATCH) 

Error Recovery Option: If the standard error recovery package on the loader input/output 
functions is desired, select the following option: 

DELETE/ 10 
LERP EQU 1 

The current value of LERP is 0. The loader deck on the PRELIB sources has LERP set to 0. 
For valid error recovery equates, see section 2. 2. 2. 

The deck card is: 

LOADER DECK/ p^.Pg ,... 

OVPRO (STD/BATCH) 

Error Recovery Option: If the standard error recovery package on the OVPRO input/output 
functions is desired, select the following option: 

DELETE/ 12 
LERP EQU 1 

The current value of LERP is 0. The OVPRO deck on the PRELIB sources has LERP set to 0. The 
LERP option in OVPRO must be set to the same value in LOADER. 

The deck card is : 

OVPRO DECK/ Pi,P2,... 
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POSTLOAD (STD/BATCH) 

Error Recovery Option : If the standard error recovery package on postload input/output functions 
is desired, select the following option: 

DELETE/ 23 
LERP EQU 1 

The current value of LERP is 0. The postload deck on the PRELIB sources has LERP set to 0. 
For valid error recovery equates, see section 2.2.2. 

The deck card is : 

POSTLOAD DECK/ P^ , Pg , • • • 

TAPE SORT 

Installations with Tape SORT may desire the optimum move assembly option to allow optimum 
efficiency on moves, dependent upon the library and the available hardware. The most rapid 
move is the BDP move; the slowest is a hardware move. 





DELETE/ 


9 




BDP 


EQU 





BDP hardware absent 


BDP 


EQU 


1 


BDP hardware present 



The release value of BDP is 0. 
The deck card is: 

SORT DECK/ Pi,P2..-. 

The BDP PRELIB replaces the hardware move with the BDP move. 

2.2.2 ERROR RECOVERY ASSEMBLY OPTIONS 

The modularity of error recovery routines permits easy modification to reflect hardware chaises 
and customer needs and to implement efficient recovery from detected errors. The routines are 
assembled into PRELOAD and can optionally be assembled into POSTLOAD, LOADER, and 
RDUMP. If assembled into LOADER, error recovery must be assembled into POSTLOAD and 
RDUMP. Any changes made to the error recovery routines should also be made in PRELOAD 
and in POSTLOAD, LOADER, and RDUMP when applicable. 

The library contains two groups of error recovery routines - one in the relocatable file (file 2) 
and the second in the absolute file (file 1). The two sets of routines are identical except that 
fUe 1 contains two additional routines. In file 1, FTNO precedes the error recovery routines 
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and PROGNAME follows error recovery. FTNO and PROGNAME establish linkage between the 
error recovery routines and the FORTRAN compiler and COMPASS assembler, respectively. 

When the length of any error recovery routine is changed from the released value, the changed 
length must be assembled into the FORTRAN compiler and the COMPASS assembler (section 2.2.3). 
FORTRAN and COMPASS both contain BBS blocks representing the lei^h of each error recovery 
routine. These lengths must correspond to the actual length of the routine in file 1. FORTRAN 
and COMPASS must be reassembled if error recovery is modified from the released version. 

The recommended order of the error recovery routines on the library is : 

RAAR 

SCAR 

MTWPR 

MTRPR 

MTLDACPR 

MTDER 

PRCPR 

ORDER 

CPDER 

MTWPRR 

MTRPRR 

MTLDCPRR 

CMNRTNS 

WHATISIT 

NKD 

NRC 

NWR 

T.NOTRDY 

TYPEOUT. 

WHATKIND 
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ERROR RECOVERY ASSEMBLY OPTIONS 



ROUTINE 










ASSEMBLY OPTION 










TAPES 


CARDRDR 


CARDPNCH 


PRINTER 


NOATMPTS 


MAXERASE 


CKSMCNST 


ATTMPTl 


ATTMPT2 


BKSPLIM2 


READB 


RAAR 


X 






















SCAR 


X 


X 


X 


X 
















WHATISIT 


X 






















NRC 


X 






















MTLDCPRR 










X 














MTWPRR 












X 


X 










MTRPRR 
















X 


X 


X 




NRD 






















X 



SCAR Modifications 

CARDRDR : This assembly option controls references to card reader recovery within SCAR 
routine. If CARDRDR is equated to zero, all calls to card reader recovery are eliminated and 
CRDER is not called. If CARDRDR is equated to nonzero, card reader recovery is present. 
CARDRDR is nonzero in this release. 

DELETE/ 90 

CARDRDR EQU 7 

CARDPNCH : In the SCAR routine, CARDPNCH controls references to card punch recovery. If 
CARDPNCH is equated to zero, all calls to CPDER routine are eliminated. If CARDPNCH is 
equated to nonzero, card punch recovery is present. CARDPNCH is equated to nonzero in this 
release. 

DELETE/ 91 

CARDPNCH EQU 7 

PRINTER: In the SCAR routine, PRINTER controls references to printer recovery. If PRINTER 
is equated to zero, all calls to PRCPR are eliminated. If equated to nonzero, PRINTER recovery is 
present. PRINTER is equated to nonzero in this release. 





DELETE/ 


92 


PRINTER 


EQU 


7 


The deck card is: 






SCAR 


DECK/ 


PI 
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MTLDCPRR Modification: 

NOATMPTS: In MTLDCPRR routine, NOATMPTS determines attempts at recovery before asking 
for an operator decision. It is currently set at 4. 

DELETE/ 42 

NOATMPTS EQU 4 

The deck card is: 

MTLDCPRR DECK/ Pl,P2, 



J J • • I 



MTWPRR Modifications : 

MAXERASE: In MTWPRR routine, MAXERASE determines the maximum number of erasures 
executed before asking for an operator decision. It is currently set at 11 (which is 10 erasures). 

DELETE/ 58 
MAXERASE EQU 11 

CKSMCNST: In MTWPRR routine, CKSMCNST determines the number of backspaces executed to 
find correct position when checksum repositioning is valid. It is currently set at 4. 

DELETE/ 59 
CKSMCNST EQU 4 

The deck card is: 

MTWPRR DECK/ Pi,P2,... 



MTRPRR Modifications : 

ATTMPTl: In MTRPRR routine, ATTMPTl determines the number of tries using one backspace 
in a read parity recovery. It is currently set at 4. 

DELETE/ 49 

ATTMPTl EQU 4 

ATTMPT2: In MTRPRR routine, ATTMPT2 determines the total number of attempts at read parity 
recovery before asking for an operator decision. It is currently set at 8. 

DELETE/ 50 

ATTMPT2 EQU 8 
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BKSPLIM2 : In MTRPRR routine, BKSPLIM2 determines the total number of backspaces for retry 
attempts when retry is recommended by the operator. It is currently set at 3. 

DELETE/ 51 
BKSPLIM2 EQU 3 

The deck card is: 

MTRPRR DECK/ Pi,P2,." 

NRD Modification : 

READS: In NRD routine, this option, if equated to zero, eliminates READB checks for noise 
records. It is currently set to nonzero. 

DELETE/ 44 
READB EQU llg 

The deck card is : 

NRD DECK/ pi,P2,... 

TAPES Modification : 

TAPES: This assembly option controls references to magnetic tapes and is located in SCAR, 
RAAR, UTIATISIT, and NRC routines. If TAPES is equated to in SCAR routine, all references to 
magnetic tape routines are eliminated, including calls to MTDER, MTLDCPRR, MTWPRR, 
MTRPRR, and WHATISIT. 

If TAPES is equated to nonzero, the value must reflect the maximum number of tapes used in any 
program for the SCAR and WHATISIT routines. TAPES is equated to 8 in this release. 





DELETE/ 


82 


TAPES 


EQU 


7 


RAAR 


DECK/ 


P1.P2 




DELETE/ 


89 


TAPES 


EQU 


8 


SCAR 


DECK/ 


P1.P2 
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DELETE/ 


16 


TAPES 


EQU 


8 


WHATISIT 


DECK/ 


PI.P2 




DELETE/ 


71 


TAPES 


EQU 


7 


NRC 


DECK/ 


PI.P2 



ROUTINE Macros 

Local macros are provided in the RAAR and SCAR routines to facilitate generation of specially 
assembled decks callable by the use of EXS cards. These macros rename the routines but cannot 
change the necessary equates. 

SCAR Routine Assemble Macro : The SCAR assemble macro provides optional variability with 
SCAR subroutines. 



Name: ASSEMBLE (n) 

(n) Assemble routine with entry points for SCAR, SCARNM, SCARUSTl. 
The IDENT card must be changed to SCAR. 

1 Assemble routine with entry points for SCARSP, SCARNMSP, 
SPSCUSTl. The IDENT card must be changed to SCARSP. 

2 Assemble routine with entry points for SCARMT, SCARNMMT, 
MTSCUSTl. The IDENT card must be changed to SCARMT. 

The IDENT card must be changed to reflect a new name. 

DELETE/ 1 

IDENT name 

DELETE/ 94 

ASSEMBLE (n) 

SCAR DECK/ P1.P2,... 

RAAR Routine Assemble Macro : The RAAR assemble macro provides optional variability with 
RAAR subroutines. 



ASSEMBLE (n) 

(n) 



Subroutine RAAR assembled with recovery for magnetic tape and all 
visual equipment; must be equated to nonzero. 

Subroutine RAAR assembled with no magnetic tape recovery; TAPES 
must be equated to . 
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Subroutine RAARSP assembled with no magnetic tape recovery for job 
modularity using EXS card; TAPES must be equated to 0; the IDENT 
card must be changed to RAARSP. 

Subroutine RAARMT assembled, using EXS card, with no visual 
equipment recovery for job modularity; subroutine NRC must be 
reassembled for this option; TAPES must be equated to nonzero; the 
IDENT card must be changed to RAARMT. The label NRC must be 
equated to NRC.MT, and ASSEMBLE (n) =3 must be followed by: 



NRC 



INSERT/ 
EQU 



116 

NRC.MT 



RAAR 



DELETE/ 


1 


IDENT 


name 


DELETE/ 


81 


ASSEMBLE 


(n) 


DECK/ 


Pi.Po.-. 



NRC Routine Assembly Macro: The NRC assemble macro provides optional variability with NRC 
subroutines. 



ASSEMBLE (n) 
(n) 



Subroutine NRC assembled with recovery for magnetic tape and for 
all visual equipment; TAPES must be equated to nonzero. 

1 Subroutine NRC assembled with recovery for magnetic tape only. 

2 Subroutine NRCMT assembled with recovery for magnetic tape only; 
the IDENT card must be changed to NRC. MT; TAPES must be 
equated to 0. 



NRC 



DELETE/ 


1 


IDENT 


name 


DELETE/ 


70 


ASSEMBLE 


(n) 


DECK/ 


P1.P2 



Error Recovery Equates 

Error recovery equates vary for the variable resident routines and can be tailored to each 
installation. 



(juiiavuou 



PRELOAD : Error recovery is always present for magnetic tape, card punch, card reader, and 
printer, and the following error recovery equates are valid. 





DELETE/ 


5472 


NOATMPTS 


EQU 


4 




DELETE/ 


5717,5718 


maxera.se 


EQU 


11 


CKSMCNST 


EQU 


4 




DELETE/ 


5863,5865 


ATTMPTl 


EQU 


4 


ATTMPT2 


EQU 


8 


BKSPLIM2 


EQU 


3 




DELETE/ 


6048 


TAPES 


EQU 


8 




DELETE/ 


6825 


READB 


EQU 


77 


PRELOAD 


DECK/ 


P1.P2 >" 


POSTLOAD: If the equate LERP 


is set to 1, < 



reader, card punch, and printer, and the following error recovery equates are valid: 





DELETE/ 


3303 


NOATMPTS 


EQU 


4 




DELETE/ 


3508,3509 


MAXERASE 


EQU 


11 


CKSMCNST 


EQU 


4 




DELETE/ 


3655,3657 


ATTMPTl 


EQU 


4 


ATTMPT2 


EQU 


8 


BKSPLIM2 


EQU 


3 




DELETE/ 


4400 


READB 


EQU 


77 
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TAPES 
POSTLOAD 



DELETE/ 

EQU 

DECK/ 



4675 



PVP2 



LOADER: If the equate LERP is set to 1, error recovery is present for magnetic tape, card 
reader, card punch, and printer, and the following error recovery equates are valid: 





DELETE/ 


3447 


NOATMPTS 


EQU 


4 




DELETE/ 


3649,3650 


MAXERASE 


EQU 


11 


CKSMCNST 


EQU 


4 




DELETE/ 


3796,3798 


ATTMPTl 


EQU 


4 


A'iTMPT2 


EQU 


8 


BKSPLLM2 


EQU 


3 




DELETE/ 


3986 


TAPES 


EQU 


8 


LOADER 


DECK/ 


Pl,P2,... 


RDUMP: If the equate SER.OPT 


is set to 1, ( 



printer and the following error recovery equates are valid: 
DELETE/ 



628 



TAPES 


EQU 


8 


' 


DELETE/ 


927,929 


CARDRDR 


EQU 





CARDPNCH 


EQU 





PRINTER 


EQU 


7 




DELETE/ 


1562 


NOATMPTS 


EQU 


4 




DELETE/ 


1005,1606 


MAX ERASE 


EQU 


11 


CKSMCNST 


EQU 


4 
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ATTMPTl 
ATTMPT2 
BKSPLIM2 

RDUMP 



DELETE/ 
EQU 
EQU 
EQU 

DECK/ 



1846, 1848 

4 

8 

3 

Pl>P2'" • 



2. 2. 3 PRODUCT SET ASSEMBLY AND OPTIONS 

Modification to standard product set members should be made at this time. 

FORTRAN 

If error recovery routines are modified, FORTRAN must be reassembled. Assemble all overlays 
of FORTRAN, including object time routines. Assemble all error recovery decks, making sure 
sizes of routines and BSS blocks in FORTRAN overlays are equal. Assemble the following special 
decks from the system COSY tape: 

FTNO 
PROGNAME 

Use the expanded PRELIB to make a library with the decks set up as follows: 

^SEQUENCE, 001 

^JOB, , , , 

9EQUIP,55=MT 

9EQUIP,01=MT 

9PRELIB,,1,S,A 

9SYMROUT 

^RECORD, START2 

^ORIGIN, ST ART2 

FTNO 

RAAR 

SCAR 

MTWPR 

MTRPR 



\ 



> 



binary decks (must be in this order) 



/ 
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> 



binary decks (must be in this order) 



MTLDACPR \ 

MTDER 

PRCPR 

ORDER 

CPDER 

MTWPRR 

MTRPRR 

MTLDCPRR 

CMNRTNS 

WHATISIT 

NRD 

NRC 

NWR 

T.NOTRDY 

TYPEOUT. 

WHATKIND 

PROGNAME / 

9RECORD,START2 

90RIGIN,START2, (octal size of error recovery routines including FTNO and PRCXjNAME) 

FTNl binary deck 
^RECORD, START2 
^ORIGIN, START2, (octal size of error recovery plus FTNl routines common to FTN2) 

FTN2 binary deck 
9RECORD, START2 
90RIGIN,START2, (octal size of error recovery plus FTNl routines common to FTN3) 

FTN3 binary deck 
§RECORD,START2 
90R1GIN,START2, (octal size of error recovery plus FTNl routines common to FTN4) 

FTN4 binary deck 
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9RECORD,START2 

7 

90RIGESf,START2, (octal size of error recovery plus FTNl routines common to FTN5) 

FTN5 binary deck 
^RECORD, START2 
§0RIGIN,START2, (octal size of error recovery plus FTNl routines common to FTN6) 

FTN6 binary deck 
9RECORD,START2 
90RIGIN,START2, (octal size of error recovery plus FTNl routines common to FTNE) 

FTNE binary deck 
qFILE 



^REPLACE, FORTRAN, FORTRAN 

FORTRAN - binary deck; includes LED card of following form 12 


1 5501,5601 

7 
9 

LED card must immediately follow EPT card with main entry point. 
§REPLACE,FL0VER,Q8QERR0R 



FLOVER 

BCDINP 

BCDOUT 

FORMAT 

BINARY 

BUFFER 

UNIT 

lOCHK 

EOFCHK 

TAPEHAND 

PAUSE 

CONTROL 



> 



binary decks 
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gFILE 



DOUBLE 

DF PRIME 

DFP 

QIQADRI 

ITOJ 

ITOX 

XTOI 

POWRF 

SIN COS 

ATANF 

EXPF 

LOGF 

SIGNF 

SQRTF 

ABSF 

EXTREMAl 

EXTREMA2 

FLOATF 

FKF 

MASKINGF 

FAULTS 

SENSLITE 

SENSWTCH 

Q8Q ERROR 



> 



binary decks 



77 

ggend-of-file 



COMPASS 

If a user coded COMPASS subroutine executes with FORTRAN I/O time routines, Q8QBCDWT may 
need to be declared external and called from the subroutine. If the COMPASS subroutine does I/O 
on units used by FTN I/O, a call to Q8QBCDWT is required to check a specified unit for outstand- 
ing BCD WRITES before the l/O operation takes place. Q8QBCDWT is a routine in FTN I/O con- 
trol that checks for outstanding BCD writes and processes status. 



II-2-2.5 



The calling sequence Is: 



ENQ 
RTJ 

lu = Number of unit 



lu 
Q8QBCDWT 



If error recovery routines are modified, COMPASS must be reassembled. Assemble all subpro- 
grams of COMPASS. Assemble all error recovery decks (program sizes must be identical to the 
size of the BSS blocks at the beginning of each subprogram of COMPASS) and the following special 
decks from the system COSY tape. 

FTNO 
PROGNAME 

Use the expanded PRELIB to make a library. Decks must be in the specified form: 

gSEQUENCE.OOl 

5job, , , , 

^EQUIP, 55=MT 
^EQUIP, 01=MT 
^PRELIB,, 1>S, A 
^SYMROUT 
§RECORD,START2 
70RIGIN,START2 



FTNO 

RAAR 

SCAR 

MTWPR 

MTRPR 

MTLDACPR 

MTDER 

PRCPR 

CRDER 

CPDER 

MTWPRR 

MTRPRR 

MTLDCPRR 



\ 



> 



binary decks (must be in this order) 



/ 
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\ 



y binary decks (must be in this order) 



CMNRTNS 

WHATISIT 

NRD 

NRC 

NWR 

T.NOTRDY 

TYPEOUT 

WHATKIND 

PROGNAME y 

9RECORD,START2 

90RIGIN,START2, (octal size of error recovery routines including FTNO and PROGNAME) 

COMPASS binary deck 
§REC0RD,START2 
^ORIGIN , START2 , (octal size of error recovery decks plus COMPASS subprogram) 

OVERLAYl binary deck 
^RECORD, START2 
90RIGIN,START2, (octal size of error recovery decks plus COMPASS subprogram) 

PASSONE binary deck 
^RECORD, START2 
^ORIGIN , START2 , (octal size of error recovery decks plus COMPASS subprogram) 

PASSTWO binary deck 

SYMTBLE binary deck 
§RECORD,START2 
^ORIGIN , START2 , (octal size of error recovery plus COMPASS subprogram) 

CRT binary deck 
7FILE 
^REPLACE, COMPASSB, COMPASSB 

COMPASSB binary deck including LED card of following form: 

12 


15501 
7 
9 

TMs card must occur after the EPT card with the main entry point and 
before the TRA card. If both 55 and 56 are to be equipped, use a LED card 
with the form: 



CflQQTfinn TT-9-9.7 



12 

15501,5601 

7 
9 

9REP LACE, COMPASS, CRT 

|UNIT,55,FTN0- 

§UNIT, 55, COMPASS 

§UNIT,55,0VERLAY1 

§UNIT,55,PASSONE 

^UNIT,55,PASSTW0 

§UNIT,55,CRT 

^FILE 

77 
ggend-of-file 

COBOL 

If it is necessary to reassemble COBOL, place the decks in the following order: 

COBOLIE 
COBOLDl 
COBOLPl 
COBOLD2 
COBOLP2 
COBOLDP3 

COSY 



Assemble the COSY subprograms and use the following PRELIB example to replace COSY on the 
library. 

^SEQUENCE, 001 

gJOB, , , , 

§EQUIP, 55=MT 

^EQUIP,01=MT 

§PRELIB,,1,S 

7fILE 

^REPLACE, COSY, COSYRDWT 
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COSY binary deck 
COSYRDWT binary deck 



(FILE 



77 



end-of-file 



BSIPP 

To expand number of operations of BSIPP: 

1. Equate NO PS to the number of operations; NO PS is set to 3 in this release. 



NOPS 



DELETE/ 
EQU 



98 
3 



Expand the following tables so they contain the number of entries NOPS is equated to. The 
example shown is for NOPS = 3. 



BLIST 



B2LIST 



RSVLIST 



DELETE/ 


2956,2958 


00 


BUF 


00 


BUF+BSIZ2 


00 


BUF+BSIZ2+BSIZ2 


DELETE/ 


2959,2961 


00 


B2BUF,3 


00 


B2BUF+B2SIZ , 3 


00 


B2BUF+B2SIZ+B2SIZ, 3 


DELETE/ 


2963,2965 


00 


RSVBUF,3 


00 


RSVBUF+RSVSIZ,3 


00 


RSVBUF+RSVSIZ+RSVSIZ , 3 


DELETE/ 


2966,2968 


00 


FABUF 


00 


FABUF+FASIZ 


00 


FABUF+FASIZ+FASIZ 



FALIST 



Change the buffer storage area. The example below is the same as the release (NOPS equal 
to 3). 



0\J£iO I UV/u 
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DELETE/ 


2977,2980 




BUF 


BSS 


BSIZ2+BSIZ2+BSIZ2 


(BSIZ2)(NOPS) 


B2BUF 


BSS 


B2SIZ+B2SIZ+B2SIZ 


(B2SIZ)(NOPS) 


RSVBUF 


BSS 


RSVSIZ+RSVSIZ+RSVSIZ 


(RSVSIZ)(NOPS) 


FABUF 


BSS 


FASIZ+FASIZ+FASIZ 


(FASIZ)(NOPS) 


SIPP 









To expand the number of operations of SIPP, chaise the equate NO PS to the number desired. NO PS 
is set to 3 in this release. 



NOPS 



DELETE/ 
EQU 



120 
3 



2.2.4 REPLACEMENT CARD 

The replacement card in the PRELIB Source Deck (section 4. 1) is illegal and must be replaced 
with the modified xCICRECl deck. 



2.2.5 BCD, BDP, AND FDP OPTIONS 

RTS/STD/BATCH for 3100/3200 



BCD 
Hardware 


FDP 

Hardware 


Action 


Absent 


Absent 


Remove SEPOINT,BCDBOXS and SEPOINT, FDPBOXS 
Set BDP EQU in xCICREClf 


Absent 


Present 


Remove SEPOINT, BCDBOXS 
Set BDP EQU in xCICREClt 


Present 


Absent 


Remove SEPOINT, FDPBOXS 
Set BDP EQU in xCICREClf 


Present 


Present 


Set BDP EQU in xCICREClt 



In all cases only BCD COBOL may be used. 



fx 



S Standard 
B BATCH 
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RTS/STD/BATCH for 3300/3500 



BCD 

Hardware 


FDP 
Hardware 


Action 


Absent 


Absent 


Remove SEPOINT.BCDBOXS and SEPOINT.FDPBOXS 
Set BDP EQU in xCICREClf 


Absent 


Present 


Remove SEPOINT.BCDBOXS 
Set BDP EQU in xCICREClj 


Present 


Absent 


Remove SEPOINT, FDPBOXS 
Set BDP EQU 1 in xCICREClt 


Present 


Present 


Set BDP EQU 1 in xCICREClt 



Where BDP hardware exists and is defined in xCICRECl (BDP EQU 1), BDP COBOL must be used. 
Otherwise BCD COBOL is required. If BDP is equated to 1, the libraiy must always be run with 
the console BDP switch turned on. 

UNDEFINED SEPOINTS 

A SEPOINT card must be inserted directly after the loader record. When only system routines 
(e.g. COMPASS) are absolutized, they are illegal. 

A SEPOINT card is used to prevent the loading of a subroutine or program; if the name specified 
on the control card is undefined, the symbol is equated to ABNORMAL, and the job terminates. 
This technique is particularly useful for installations with optional floating-point and BCD 
hardware. For example, the following cards in file 1 input would prevent loading of hardware 
simulation routines FDPBOXS and BCDBOXS. 

SEPOINT, FDPBOXS 
SEPOINT, BCDBOXS 

Other undefined system entry points (CIP and PERADD) do not invalidate the PRELIB as long as 
no routines reference the undefined SEPOINT. 



2.2.6 DRIVER SELECTION 

In this release, the drivers for all equipments and controllers are included within the STD and 
BATCH PRELIB source decks. 



I X = S Standard 
B BATCH 



TT-9-S1 



DRIVLABT 

Users with a 601, 603, or 606 driver must make the following modification, 

DELETE/ 3 
TAPE EQU 606 

The deck card is : 

DRIVLABT DECK/ pj^ , Pg , . . . 
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SYSTEM DRIVERS 

Remove the unnecessary drivers. The drivers are identified by unique program lengths on their 
IDC cards and may be removed by cross-referencing the PRELIB Source Deck Listii^, part II, 
section 4.1, and the following chart. 



Hardware 


Control Data 
Controllers t 


Control Data 

Equipmentf 

(in combination) 


COSY 

Name 


Entry Point 
Name 


Deck 
Length 


MT 


362x 
342x 

322x 


604 
607 


DRIVLABT 


DRIVEROl 


344 


MT 


362x 
342x 
322x 


601 
603 
606 


DRIVLABT 


DRIVEROl 


330 


CR 


3447 
3649 


405 


DRIV3649 


DRIVER02 


245 


CR 


3248 
3142 


405 


DRIV3248 


DRIVER02 


235 


PR 


3256 
3659 
3152 
3254 


501 
505 


DRIV3659 


DRIVER03 


356 


PR 


3555 


512 


DRV512 


DRV512 


406 


CP 


3644 
3446 


415 


DRIV3644 


DRIVER04 


222 


CP 


3245 


425 


DRIV3245 


DRIVER04 


345 


TY 


Console 
Typewriter 


- 


DRIVTYWR 


DRIVER05 


115 


PL 


3293 


Plotter 


DRIV3293 


DRIVERll 


60 


OR 


3195 


915 


DRIVER12 


DRIVER16 


330 


TR 
TP 


3691 


Paper Tape 
Station 


DRIV3691 


DRIVER06 
DRIVER07 


625 



•j- Registered trademark of Control Data Corporation. 
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The final PRELIB source is generated through the utility routines on an installed system (Tape 
SCOPE 2.4 or RTS 1. 2). To pimch the source decks that are not installation dependent: 

Mount release tape 1 and space tape forward one file. This positions release tape 1 at the 
standard PRELIB source. If a BATCH source is desired, space the tape forward one 
additional file. 

Punch the appropriate PRELIB source. 

At this point, the user must decide if BDP COBOL and BDP SORT for the 3300/3500 
are desired. If BDP COBOL and BDP SORT are not desired, skip next step. If a 
standard PRELIB source was punched, space the tape forward one file. 

Punch BDP COBOL and SORT PRELIB source. 

The BDP COBOL and SORT PRELIB source (section 4. 1. 3) can be used as standard INP 
or can be punched. 



2.3 FINAL LIBRARY GENERATION 

To generate a final RTS library, an installation must have the following materials: 

An operable interim library. 

The autoload program installed in core storage. 

The proper PRELIB source deck (RTS/STD or RTS/BATCH) modiHed to fit the particular 
hardware configuration. 

The library generation proceeds as follows : 

1. Mount the interim library on physical unit 0. 

2. Mount scratch tapes on physical units 1 and 2. 

3. Mount tape to receive the final library on unit assigned to logical unit 1. 

4. Place the PRELIB source deck in the card reader. 

5. Execute the PRELIB source deck. 

6. The interim PRELIB will produce the following CTO diagnostics: 

I PLIB 031 PRELIB HISTORY BEGIN 

I PLIB 042 PRELIB HISTORY END 

If any other diagnostic appears on CTO or OUT, the error must be corrected and the 
job repeated. 
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2.4 MMTC ADD-ON TO RTS 2.0 SYSTEM 

After the initial release of RTS 2.0, new capabilities have been added to the system. This section 
provides sufficient information to add these capabilities to an existing RTS 2. system. 



2.4.1 DRIVMMTC 

DRIVMMTC is the driver for the 3518/3528 Modular Magnetic Tape Controller (MMTC) and the 
657/659 Magnetic Tape Transports. 



Release Materials 



The release materials will be on punched cards in the following form: 

COSY changes for CIO 

COSY changes for xCICRECl (x=S or B) 

COSY changes for RDUMP 

COSY changes for PRELOAD 

COSY char"'es for LOADER 

COSY changes for POSTLOAD 

COSY changes for ERROR RECOVERY 

COSY formatted deck of DRIVMMTC 

COSY formatted deck of MMTCINIT 

Binary deck of MMTCINIT 



T657 Assembly Option 

Definition: The T657 option permits those installations with 657 Tape Transports to utilize them 
through software modifications. 

Option: 

DELETE/ 120 

T657 EQU n 

n = number of 659 Tape Transports 

Release Value: T657 = 1 



T659 Assembly Option 

Definition: The T659 option permits tiiose installations with 659 Tape Transports to utilize them 
through software modifications. 
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Option: 

DELETE/ 122 

T659 EQU m 

m = niunber of 659 Tape Transports 

Release value: T659 = 1 

Installation Procedures 

1. Select and set assembly cations according to configuration. 

2. Assembly DRIVMMTC. 

3. Generate changes necessary for AET (part III, section 2). 

4. Assemble CIO, xCICRECl, RDUMP, PRELOAD, LOADER, POSTLOAD, where x is 
B = Batch or S = Standard. 

5. Apply COSY changes to ERROR RECOVERY at 5 locations. 

6. Edit PRELIB SOURCE by inserting the binary decks and files from the above steps. 

7. Execute the edited PRELIB SOURCE. 

8. Initialize MMTC (see below). 

9. Autoload and verify new system. 

MMTC Initialization 

The image memory of the MMTC (3518 or 3528) must be loaded before tape qjerations can be 
executed. The procedure requires the following steps: 

1. Separate the MMTC initializer binary program from the MMTC release materials. 

2. Obtain a one-card loader (part n, section 9). 

The image memory initializer prc^ram contains the CDC 64 character subset of ASCII for tiie 
image memory and several subroutines necessary to extract the configuration of the MMTC 
and physically write the image memory. 

3. Place the one-card loader followed by the binary deck of the image initializer in the 
card reader. 

4. Autoload from the card reader. 

The computer types: 

A MMTC 001 C(c)E(e)U(uu) 

5. Type the appropriate channel c, equipment e, and unit numbers uu for MMTC. 
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The program will attempt to initialize the image memory. If successful, the following message 
is typed: 

I MMTC 005 IMAGE MEMORY LOADING COMPLETED 

NOTE 

If the user has a 3528 controller this procedure will be 
repeated so that both image memories (one per channel) 
can he initialized. 

If imsuccessful, one or more of tiie following will be typed: 



Message 


Significance 


Action 


I 


MMTC 


003 


IMAGE MEMORY 
PARITY ERROR 
xxxx 


xxxx=WRn'E Parity error 
occurred during write of 
image memory 

xxxx=READ Parity error 
occurred during read 


Retry 

If error continues, Uie con- 
troller should be examined 
for hardware malfunction. 


I 


MMTC 


004 


UNEXPECTED 
STATUS WORD 
II ssss 


ssss=status in octal. Ab- 
normal condition (other 
than memory parity) 
occurred. 


Retry 

If error continues, the con- 
troller should be examined 
for hardware malfunction. 


A 


MMTC 


006 


xxx REJECTED 

yyyyyyyy 


xxx=CON connect 
SEL select 

yyyyyyyy=rejected 

instruction in 

octal 


1. Press FINISH to restart 
initializer, or 

2. Press REPEAT to retry 
rejected function. 


A 


MMTC 


007 


IMAGE MEMORY 
zzzz REJECTED 


zzzz=INPW Input word in- 
struction rejected 

zzzz=OUTW Output word 
instruction rejected 


1. Press FINISH to restart 
initializer, or 

2. Press REPEAT to retry 
rejected function 


A 


MMTC 


008 


CONTROLLER 
BUSY AFTER 10 
SECONDS 




1. Press FINISH to restart 
initializer, or 

2. Press REPEAT to continue 
to wait 


I 


MMTC 


009 


IMAGE MEMORY 
LOADED INCOR- 
RECTLY 


After image memory was 
initialized, it was read, 
and the returned image 
differs from the image 
that was written. 


Retry 

If error continues, examine 

controller for hardware 

malfunction. 
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A copy of the image memory initializer is provided in COSY format to allow the user to select a 
code set other than CDC 64 character subset of ASCH after installation is completed. If the pro- 
gram is utilized this way the following message will be typed if two BCD codes have the same 
8-bit code equivalent: 





, 

Message 


Significance 


Action 




I 


MMTC 


002 


DUPLICATE CONVERSION 


Two BCD codes have 
the same 8-bit code 
XX = character 1 
yy = character 2 





n-2-38 
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INCORPORATING PRODUCT SET MEMBERS 



The installation of some members of the RTS product set is generated through separate sets of 
procedures because: 

The products involved are special applications programs or use special applications 
equipment that some users may or may not have or need. 

The procedures depend on the existence of a fully operable RTS final library. 

The procedures that follow involve installation and generation of: 

SAINT 
ADAPT 
PERT Time 
PERT Cost 



3.1 SAINT 

SAINT is released on COSY tape. Use the following sample procedures to add SAINT to an RTS 
library: 

1. Mount RTS tape on physical unit 00 and scratch tape on physical unit 01. 

2. Mount COSY tape on logical unit 01, scratch tape on logical unit 02. 

3. Create and run a card deck of the following form: 

JOBl 

Job 1 assembles according to options selected. A 16K simulator with multiply and divide example 
is given here. COMPASS assembles Hollerith tape 02. The example is a listing of a SAINT 
binary deck with options selected. 



^SEQUENCE.OOl 
^JOB-SAINT-COSY, 
^EQUIP,01=MT,02= MT 
^COSY 





DELETE/ 


39,41 




DIVIDE 


EQU 


TRUE 


/ 


MEMIZE 


EQU 


16000 


1 
I 


MULTIPLY 


EQU 


TRUE 


) 


SAINT 


DECK/ 


I=01,H = 


02 



Option examples 
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ENDCOSY/ 
5COMPASS,I = 02,L,R,P 
ggend-of-file 



JOB 2 



JOB 2 inserts a binary image of the binary deck from JOB 1 on scratch logical 01 at the beginning 
of file 2 as given in the example. 

9SEQUENCE.OO2 

^OB, SAINT-LIB,, 

^EQUIP,01 = MT (new system tape) 



^PRELIB, 


,01 




^FILE 






^INSERT 








SAINT binary 


deck 


^FILE 






ggend-of-file 




4. Load RTS, 





3.1.1 ASSEMBLY OPTIONS 

The following table provides the COSY sequence number, SAINT core requirements, and the name 
of the assembly parameters that must be equated to TRUE to select the various options in SAINT, 
For a complete description of assembly options see appendix A of the 3100/3200/3300/3500 SAINT 
Reference Manual, Pub. No. 60213700. 



II-3-2 60237000 



Sequence Number Name Core Required (d ecimal) 

30 ADDRTABL 

31 BRANBIT 

32 COLBIN 

33 COMPRESS 

39 DIVIDE 

40 MEMSIZE 



41 MULTIPLY 

43 SIM1403 

44 SIM1407 

46 STERLING 

47 TRACEDMP 

48 TRANSLAT 

49 WMIO 

50 WMBL 

For WMBL, WMIO must be equated to TRUE. If WMIO is TRUE and WMBL is nonzero, tape word 
mark I/O is performed in a non-time-dependent manner. TMs can be equated to the minimum 
number of characters desired in the input/output buffer. When using word mark I/O, if WMBL is 
equated to the maximum number of input or output characters, no density (tape) restrictions apply. 
However, if WMBL is equated to FALSE, the following restrictions apply: 

3200/3300 601, 603, 604 tape transports , no density restrictions. 
606, 607 tape transports, restricted to 200 BPI. 

3100 Restricted to 200 BPI for all tape units. 



288 




20 




306 




88 




123 




4K- 


- 2000t 


8K- 


- 4000t 


12K- 


- eooof 


16K- 


- SOOOf 


90 




-7 




236 




1386 




293 




101 




195 




151 





t The simulation of SAINT memory requires half the nonsimulated core size. 
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3.1.2 CORE REQUIREMENTS 

Use the following equation to find total core size of SAINT: 

St = 2510 + nigmsize + so + 

st Total core requirement for SAINT 

so Total of option core reqirements 

wmbl Size of word mark buffer length (variable) 

memsize Size of simulated memory 

3.2 ADAPT 

The ADAPT release consists of two packages, one for 16K and one for 32K. 

Each package consists of: 

A binary (load-and-go) tape from which to make ADAPT overlay tape. 
A set of operating procedures. 

Also available are: 

A BCD tape of the ADAPT source decks 
ADAPT Internal Maintenance Specifications 

ADAPT operates from an overlay tape made from the binary tape furnished as a part of the 
ADAPT system release, or from decks pimched from the tape. 

A deck of test programs is provided to ensure successful production of the overlay tape. Sample 
output from these programs is included in the appendix of the ADAPT Internal Maintenance 
Specifications. A single run is required to create the overlay tape and test the sample part 
programs. 

3.2.1 16K ADAPT PREPARATION 

1. Mount ADAPT source tape on logical unit 01. 

2. Mount scratch tapes on logical units 02 and 03. 

3. Run the following job: 

gSEQUENCE.OOl 
JjOB, , , , 
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^EQUIP,01 = MT,03 = MT 
^FOHTRAN,I = 01,P = 02,L = 03 
§COMPASS,I = 01,P = 02,L = 03 
|fORTRAN,I = 01,P=02,L = 03 
9COMPASS,I = 01,P=02,L = 03 
9FORTRAN,I = 01,P = 02,L = 03 
^end-of-file 

4. Punch binary decks from logical unit 02 and list source from logical unit 03. 

5. Duplicate the following binary decks: 

Deck Sequence number Copies 



STDPACK 


0110 




STDUNPK 


0111 




PTRIT 


0125 




GENPLN 


0223 




ZVECT 


0224 




Z VALUE 


0225 




DOT 


0227 




CROSS 


0226 


2 


LENGTH 


0228 


1 


NORM 


0229 


2 



Place routines STDPACK, STDUNPK in the main portions of OVERLAYl and OVERLAY2. 

Place PTRIT in segments 2 and 3 of OVERLAY2. 

Place the second copies of CROSS and NORM in OVERLAY4, 

6. Set up the overlay deck structure: 

gSEQUENCE.OOl 

9JOB, , , , 

9EQUIP, 05 =MT, 06 = MT, 07 = MT 

^EQUIP,49 = 06 
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12 
049 

7 
9 

binary decks for MAIN OVERLAY 

CDCADAPT 

INITIAL 

PRCNTL 

LBSRCH 

TAPERD 

TAPEWT 

12 

349,1 

7 

9 

binary decks for OVERLAY 1 

PASSIA 

ITYPE 

DOMAC 

PTIDENT 

ERRMSG 

BCDFETCH 

JUGGLE 

NUMSTOR 

STDPACK 

STDUNPK 

12 

249,1 

7 
9 

binary decks for OVERLAY 1, SEGMENT 1 

PlASEGl 

CARDBKUP 

PTGEN 

SERCHV 
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12 


249,2 
7 
9 

binary decks for OVERLAY 1, SEGMENT 2 

P1ASEG2 

POSMACH 

MACDEF 

CAWL 

TERMAC 

RSERV 

PTRIT 

249,3 
I 
binary decks for OVERLAY 1. SEGMENT 3 

P1ASEG3 

COMPUT 

IFJUMP 

PTRIT 

GEOMIA 

FINI 

12 


249,4 
7 
9 

binary decks for OVERLAY 1, SEGMENT 4 

P1ASEG4 

TABLSET 

XABLE 

YABLE 

12 


349,2 
7 
9 
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binary decks for OVERLAY 2 

PASSIB 

PTID 

TABLSIB 

ERRMSG 

STDPACK 

STDUNPK 

CANGET 

CANPUT 

DEFPRE 

12 


249,1 
7 
9 

binary decks for OVERLAY 2, SEGMENT 1 

SEND 

BCDINF 

FINIB 

MISC 

PSIS 

POKE 

RITAPE 

MOTION 

PREPRO 

TABCO 

QUAD 

RFCTF 

SSQRF 

PPARAM 

12 


249,2 
7 
9 

binary decks for OVERLAY 2, SEGMENT 2 

JDSEG2 

GENPLN 
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ZVECT 

Z VALUE 

CROSS 

DOT 

LENGTH 

NORM 

LINEOl 

LINE02 

LINE03 

LINE04 

LINE05 

LINE06 

LINE07 

LESTEOS 

LINE09 

PLANOl 

PLAN02 

PLAN03 

ELLPOl 

ELLHYP 

GCONOl 

MATXOl 

MATX02 

MATX03 

MATX04 

12 


249,3 
7 
9 

binary decks for OVERLAY 2, SEGMENT 3 

JDSEG3 

GENPLN 

ZVECT 

ZVALUE 

CROSS 
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DOT 

LENGTH 

WORM 

PONTOl 

PONT02 

PONT03 

PONT04 

PONT05 

PONT07 

CIRLOl 

CIRL02 

CIRL03 

CIRL05 

CIRL08 

CIRL09 

CIRLIO 

CIRLll 

CIRL12 

12 


349,3 
7 
9 

binary decks for OVERLAY 3 

CALLSEG2 

SUPER 

AMINDX 

DDSTX 

UNRMALX 

AERRX 

ASTOSX 

CENTRX 

RADARX 

CPLANX 

CCURVX 

DELTAX 
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ARLMG 

TLNORMX 

CHECKX 

QUADX 

ATAPEX 

UNORMX 

STRTUPX 

AJUNDDX 

AREPREX 

12 


249,1 
7 
9 

binary decks for OVERLAY 3, SEGMENT 1 

CALLSEGl 

SECTN2X 

12 


249,2 
7 
9 

binary deck for OVERLAY 3, SEGMENT 2 

ARLMCL 

12 


249,3 
7 
9 

binary decks for OVERLAY 3, SEGMENT 3 

CALLSEG3 

UNTABC 

DDTABC 

12 



349,4 
7 
9 

binary decks for OVERLAY 4 

PICKPOCK 

POCKET 

ATAPEY 
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ASTOSY 

AERRY 

WORM 

CROSS 

12 


349,5 
7 
9 

binary decks for OVERLAY 5 

PASSB 

CLPRNT 

SEARCH 

IFEXED 

MULTM 

TSFMPT 

TSFMVC 

MATMOV 

TABFCT 

12 


349,6 
7 
9 

binary decks for OVERLAY 6 

SECTN4 

DISPAT 

12 


249. m 
7 
9 

binary deck for post processor; each post processor is a segment 

gRUN 
§§end-of-file 

7. Mount a tape for the overlay tape on logical unit 49. 

8. Mount scratch tapes on logical units 05 and 07. 

9. Place above overlay structure in card reader and load. Upon completion of run, remove the 
write ring from the overlay tape. 
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3.2.2 16K ADAPT EXECUTION 

1. Mount overlay tape on logical unit 49 and scratch tapes on logical units 05 and 07. 

2. Place the following job deck in the card reader and load: 

^SEQUENCE, 001 

9 JOB, , , 

^EQUIP,49=MT,05=MT,07=MT 

binary cards for MAIN OVERLAY (see preparation) 

|run 

part programs 

*** (end of batch card) 

^^end-of-file 

3. Printed output is on logical unit 61. 

4. Duplicate the following binary decks : 

Deck Name Sequence Number Copies 

STDPACK 

STDUNPK 

PTRIT 

CROSS 

NORM 

Place STDPACK and STDUNPK decks in main portions of OVERLAY 1 and OVERLAY 2. 

Place PTRIT deck in OVERLAY 1, SEGMENT 2 and SEGMENT 3. 

Place CROSS and NORM decks in OVERLAY 4. 

5. Set up the following deck structure: 

^SEQUENCE,... 
§JOB, . . , 



0110 




0111 




0125 




0226 




0229 





§EQUIP, 05 = MT, 07 =MT 
?!eQUIP,06=MT,49=06 



12 
-749 (main) 
9 
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binary decks for MAIN OVERLAY 
CDCADAPT 
INITIAL 
PRCNTL 
LBSRCH 
TAPERD 
TAPEWT 
FLOVER 
12 
349,1 (overlay 1) 

7 
9 

binary decks for OVERLAY 1 

PASSIA 

ITYPE 

DOMAC 

PTIDENT 

ERRMSG 

BCDFETCH 

JUGGLE 

TABLSET 

NUMSTOR 

STDPACK 

STDUNPK 

XABLE 

YABLE 

12 

§49.1 

7 
9 

binary decks for OVERLAY 1, SEGMENT 1 

PlASEGl 

CARDBKUP 

PTGEN 

SERCHV 

TABLCK 
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12 



249,2 
7 
9 

binary decks for OVERLAY 1, SEGMENT 2 

P1ASEG2 

POSMACH 

MACDEF 

CAWL 

TERMAC 

RSERV 

PTRIT 

12 


249,3 
7 
9 

binary decks for OVERLAY 1, SEGMENT 3 

P1ASEG3 

COMPUT 

IFJUMP 

PTRIT 

GEOMIA 

FINI 

^§ 
349,2 
7 
9 

binary decks for OVERLAY 2 

PASSIB 

PTID 

TBLSIB 

ERRMSG 

STDPACK 

STDUNPK 

CANGET 

CANPUT 
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12 


249,1 
7 
9 

binary decks for OVERLAY 2, SEGMENT 1 

SEND 

BCDINF 

FINIB 

MISC 

PSIS 

POKE 

RITAPE 

MOTION 

PREPRO 

TABCO 

QUAD 

RFCTF 

SSQRF 

PPARAM 

12 


249,2 
7 
9 

binary decks for OVERLAY 2, SEGMENT 2 

DEFPRE 

JDSPAT 

GENPLN 

ZVECT 

ZVALUE 

CROSS 

DOT 

LENGTH 

NORM 

PONTOl 

PONT02 

PONT03 
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PONT04 

PONT05 

PONT07 

LINED 1 

LINE02 

LINE03 

LINE04 

LINE05 

LINE06 

LINE07 

LINE08 

LINE09 

PIANO 1 

P1AN02 

PIANOS 

CIRLOl 

CIRL02 

CIRL03 

CIRL05 

CIRL08 

CIRL09 

CIRLIO 

CIRLll 

CIRL12 

ELLPOl 

ELLHYP 

GCONOl 

MATXOl 

MATX02 

MATX03 

MATX04 



12 


349,3 
7 
9 
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binary decks for OVEELAY 3 
CALLSEG2 
SUPER 
AMINDX 
DDSTX 
UNRMALX 
AERRX 
ASTOSX 

CENTRX 

RADARX 

CPLANX 

CCURUX 

DELTAX 

ARLMG 

SNAP 

TLNORMX 

CHECKX 

QUADX 

ATAPEX 

VNORMX 

STRTUPX 

AJUNDDX 

AREPREX 

12 


249,1 
7 
9 

binary decks for OVERLAY 3, SEGMENT 1 

CALLSEGl 

SECTN2X 

12 


249,2 

7 

9 
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binary decks for OVERLAY 3, SEGMENT 2 
ARLMCL 



12 


249,3 
7 
9 



binary decks for OVERLAY 3, SEGMENT 3 

CALLSEG3 

UNTABC 

DDTABC 

12 


349,4 
7 
9 

binary decks for OVERLAY 4 

PICKPOCK 

POCKET 

ATAPEY 

ASTOSY 

AERRY 

NORM 

CROSS 

12 


349,5 
7 
9 

binary decks for OVERLAY 5 

PASS3 

CLPRNT 

SEARCH 

IFDCED 

MULTM 

TSFMPT 

TSFMVC 

MATMOV 

TABFCT 
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12 


349,6 
7 
9 

binary decks for OVERLAY 6 

SECTN4 

DISPAT 

12 


249, m 
7 
9 

binary decks for post processor (each post processor added comprises 
a segment) 
^RUN 

test part programs 
^^end-of-file 

6. Mount tape for overlay tape and scratch tapes as specified on the EQUIP cards. Load 
overlay deck structure into the card reader and execute the job. 

7. TTpon completion of the run, remove the write ring from the tape on logical unit 49. This is 

.le overlay tape to be used for numing part programs, 

3.2.3 32K ADAPT PREPARATION 

1. Mount ADAPT source tape on logical imit 1 and scratch tapes on logical units 2 and 3. 

2. Place the following job in the card reader: 

^SEQUENCE, 001 
?JOB, , , , 

^EQUIP,01 = MT,02=MT,03 = MT 
^FORTRAN, 1 = 01, P = 02,L = 03 
^COMPASS,I = 01,P = 02,L = 03 
^FORTRAN, 1 = 01, P =02, L = 03 
^COMPASS, I =01, P = 02,L = 03 
^FORTRAN, 1 = 01, P = 02,L = 03 
^|end-of-file 

3. Punch the binary cards from logical unit 02 and list from logical unit 03. 
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3.2.4 32K ADAPT EXECUTION 

1. Mount overlay tape on logical unit 49. 

2. Mount scratch tapes on logical units 05 and 07. 

3. Place the following deck in the card reader and load: 

9SEQUENCE,... 
9JOB,.., 

^EQUIP,05=MT,07 = MT 
^EQUIP,49=MT 

binary decks for MAD^ OVERLAY (see preparation) 
^RUN 

part programs I 



77 
88 



end-of-file 



4. Printable output is produced on logical unit 60. 



3.3 PERT TIME 

The release materials for PERT Time consist of two tapes and two binary main decks. One tape 
and deck is for use under a 16K system, the other for a 32K system. The 16K and 32K variant 
tapes have the same structure. A 16K variant batch library with no options requires 12. 3K of 
core. A 32K variant requires 24. 3K of core. The first file is a binary LGO file. The second is 
made up of images of source cards and control cards which, when mounted as standard input, 
punch the main program, generate listing of source, and produce an LGO file that is the same as 
that given in file 1. 



3.3.1 CREATE OVERLAY FROM FILE ONE OF RELEASE TAPE 

The foUowli^ control cards create an overlay tape from the binary LGO tape. Mount the release 
tape on logical imit 56. The overlay tape will be created on logical imit 55. 

^SEQUENCE, 001 
^JOB,,,,ND,NP 



t When using a tabcyl as a drive surface and a second overlapping tabcyl as a check surface, 
execution errors may occur because of the nature of information given in this particular situation. 
Using an intersecting line as a check surface to pass from one tabcyl to the other provides a 
means of bjrpassing this trouble spot. 
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^EQUIP,55 = MT,05 = 55 

^EQUIP,56=MT 

^LOAD.Se 

gRUN 

Qoend-of-file 



After the job creates an overlay tape, it loads overlay 1 and the job terminates. When the overlay 
tape is used to run the PERT Time run, it must be used with the library it was created on. 



3.3.2 CREATE OVERLAY AND FOLLOW WITH COMPUTER RUN 

The following control cards create an overlay tape followed by a computer run. 

^SEQUENCE, 001 

^OB,,,.ND,NP 

qEQUIP.SG =MT (Mount release tape on logical unit 56) 

^EQUIP,55 =MT (Logical unit 55 will be overlay tape) 

^EQUIP,05=55 

^EQUIP, 1 = MT, 2 = MT, 3 = MT (PERT work tapes) 

^LOAD,56 

|run 

(PERT control cards) 



STOP 

77 
ggend-of-file 

The following control cards generate PERT Time reports with a previously created overlay tape. 

^SEQUENCE, 001 

?JOB,,,.ND,NP 

IeQUIP,05 = MT (Mount overlay tape, logical unit 5) 

^EQUIP,1=MT,2 = MT,3=MT (PERT worktapes) 

(binary PERT Time main deck) 
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gRUN 



(PERT control cards) 



STOP 
^end-of-file 



3.4 PERT COST 

The release materials consist of a two file tape and a binary card deck of PERT Cost MAIN. The 
first file of the tape is a binary LGO file. The second file is made up of source cards and control 
cards which when mounted as standard input, punch the main, generate a listing of the source, and 
produce an LGO file that is the same as that given in file one. 



3.4.1 CREATION OF OVERLAY TAPE 

The following deck structure generates a PERT Cost overlay tape on logical unit 55. 

^SEQUENCE, 001 

^JOB,,.,ND,NP 

^EQUIP,55=MT,05=55 

^EQUIP, 56 = MT (Mount release tape on logical unit 56) 

^LOAD, 56 

^RUN 

^end-of-file 

After overlay tape has been created, PERT Cost is loaded and then terminates with the following 
message: 

T CONTROL CARD MISSING 
PERT Cost processing can begin. 
The following job structure is set up to execute a PERT Cost run. 

^SEQUENCE, 001 



^OB,..,ND,NP 

SeQUIP, 05 =MT (Mount OVERLAY tape on logical unit 05) 

^EQUIP, 1 =MT, 2 =MT, 3 =MT (PERT work tapes) 
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(binary PERT Cost main deck) 



iRUN 



(PERT Cost control cards) 



77 

ggcnd-of-file 
The PERT Cost run must be run under the same library that created the overlay tape. 
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RELEASE RELATED AIDS 



4.1 PRELIB SOURCE DECK LISTINGS 

4. 1. 1 PRELIB SOURCE FOR STANDARD 



c.c. 


StuUtNCtjUO^ 


c«c. 


jOo« » » » ■» 


c.c. 


tyUlH»bb=Mrf05=bb 


c.c. 


ttaiUlP* 1=1*11 


c.c. 


fKCLlB**! 


c.c. 


Htr-LACt 


c.c. 


HtCOKUfU 


c.c. 


Orac>ii<l»U 


iUC 


ZtKU HHOG.Lt:Nt»TM=OUuoU 


iUC 


CiU HH0G,L£N!!irH=UiOv»ii 


iuc 


UKU/EHUl P«O(3.LtMGTH=00j'f4 


IcJC 


UKlVEKui HHOl>.Lt:rtGTH=003ju 


luC 


DKlvEKy^ HKOG,L£NGTn=0oi:'»D 


luC 


utUVtHOS HHOG,LtNGTri=00<:46 


IUC 


DKlVtHOa PHOG,LEtNGTH=OOJ30 


LUC 


DxVSlid PHOG.LtlMGTMSOUtUo 


wc 


OKiVeHU«!> HH0G.LtiNGTH=u'Ui<:2 


luC 


0Kiveriu4 PHOo.Lc.rtv>Tn=UuJ'rD 


luC 


UKItftKUb HKOo.LfcNGTM-OOiJit) 


iUC 


DKiVLKli HKUG.CtiVGrrtsyO jou 


iUC 


DHlvErtKi PriOe.L£*NGTH=0OJ->u 


iuC 


uHiwaoyi PH0G.Lt.i4GTH=0UO<ib 


C.c. 


KtHLACliMENT 


c.c. 


r<t.C0rtU»iTART2 


c.c. 


OrtiGiiM»STAHT<f 


XUC 


►^UUMH' PKUG,LfcNtiTri=yU30'»- 


c.c. 


f<t.C0KL»»SlrtKT4i 


c.c. 


0«iGiiM»iTMKT<i 


tAb 


LyuF=srAwi2 


iuC 


PrttLOAU HKOG.LtHGlMsiliiJ 


LAS 


tNueK0r=H'Oisl!.0Al) 


C.c. 


rttCOKU.STAKTi 


C.C, 


Or<lGXiMtS(AHr2 


IUC 


C^KC.C r'KOo.Lt.iMGTHsOOOJO 


tAb 


CiuHCA|_L=HbNOKMAL 


iUC 


LUMUtK PKUG,L£i*lGTrt=04/ib 


c.c. 


bti-OlNl »riCiJdUXS 


c.c. 


bcPOitiT.KuPcJOXS 


c.c. 


St-Huli-Jj »«t>iiOKMAL 


c.c. 


itKulNf^MCCOUNrS 


c.c. 


StHOiNl »«t.T 


c.c. 


b£HuI<\ii TcstNKAUU 


c.c. 


bt^'OiNj trtNtAir 


c.c. 


btr'UiNT ^t>^^iUNFLG 


c«c* 


i)t>'UiM Jttl'J. 


c.c. 


StKUiiMf »rtKnI 


c.c. 


i>t:HUir'ii ,CiO 


c.c. 


btfoliNl »C1C3.01 


CL. 


btf'UlNftCiH 


c.c 


StHUi>Mr*Cil 


c.c. 


btHOiN|,ci r.KTM 


c.c. 


i.tt'OlNi »Cbi 



P«Gt 



INSERT DECK OF SCIC 
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pMlit 



c.c 


. StPUlui 


♦UiNT. 


c«c 


. StHUIul 


♦ tlMl". 


c.c. 


. i>£H01ivl 


»£SI 


c.c 


. btHoliMi 


»t)UKLG 


c.c 


. bt-POINT 


»LUMU£rt 


c.c. 


. OtHUiiMl- 


»LuCb 


c.c. 


ijtPOlNl 


.htMOKY 


c.c. 


. StHuli^l 


fMlbKMUU 


c-c. 


St.PUl.Ml 


»MitiUF 


cc. 


i>tHUi.<ir 


»i'1il^U«AUU 


c.c. 


SfcVUl.MT 


tINUtXiT 


cc. 


atPOiiil 


fPLKpAUU 


cc. 


btPOliMT 


»KL)CKf-l 


cc. 


SEHOI.mT 


»rtrt 1 


cc. 


StPOLMI 


»HiO 


cc. 


StKOir^fi 


»srAKr2 


cc. 


StPOllMf 


»Ubl 


cc 


HtCUKU» 


LS-rcGTM 


cc 


Or(lGl.il» 


LSiHiTH 


U'C 


OVHKU 


HKOtJ.Lt'^bTH 


cc 


HtCOHUf 


WliMrJUF 


c.c 


UHl«i.'i»OIi>JrtJK 


IOC 


HHOltCI 


PHUG.LtHtirM 


luc 


PUSILJhU 


PHOti.LtNuTH 


c.c. 


KtCOKU* 


b<AHr<; 


c.c 


UHKJi J, 


bTAHid 


ILL 


F INO 


PKOli.LENGrrt 


luC 


riMrth 


Pr<U6.L£lM(j|H 


luC 


SCAH 


P«00,Le.-NGTH 


iuC 


MIWpPW 


HP(Jb,LtN6TH 


iUC 


"iirtHrt 


PHUb.LtNCjfH 


ii^C 


rvlfLUACPH 


PH0(7,Ltl>HiTH 


^UC 


M 1 Utrt 


HhUH.LtHoTH 


iuC 


phcpk 


PKOG.LEi^iirH. 


iuC 


CHUtK 


PHOfcj. LENGTH: 


luc 


CHUtH 


PKOG.LtWGTM' 


It/C 


MrwPKhi 


PKOG.LtNGrH! 


luc 


»lTrJP«r( 


PHUG.LtiMGTft: 


IUC 


MTUUCPKH 


PHOG.LtNGTH' 


IbC 


C■•l<^(rtTl'^S 


PHUG.LEw^jrri! 


IUC 


WHAllbll 


PrtOG. LENGTH' 


IDC 


NKi^ 


f'HOG.Ltt^GTH' 


IUC 


NHC 


PHOG. LENGTHS 


iUC 


N»(K 


PHOG.Lt'^GTH' 


iUC 


T.nutkuy 


HrtOG, LENGTH: 


IUC 


TrPtour, 


PHOG.LEiMGTHs 


ILIC 


KMAFKINU 


PKOG. LENGTH! 


luc 


Pr<0*3rtAi«1fc 


PHOG,LEiMGrH = 


cc. 


KtCOKU* 


srAHT^: 


cc. 


UKlei>M» 


SlAHTiifa^U/ 


IUC 


COMPASS 


PHOG, LENGTHS 


c.c 


HtCOPUj 


3 1 AH re: 


cc. 


UKlGlNt 


SlAKt/i.lOlU? 


IUC 


OvtKLAYi 


PHOG. LENGTHS 


cc 


rtfcCUKUt 


STAWTii 



= 0ii-3OD 






= 00u'J2 
sOuJ^O 

=UOUiy 

!Ouu<;o 

=OOuiO 

!00\JiO 

'ooii:j 

=OUJJb 



■Hilof 



lil<*3 
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pMOt 



c.c. uHieii>t»ijrAHr^» 10107 

luC PMSiUiMt Hr<UCj,Lt*'tdrM = 10«:';«i 

c«c. uixiiii.>nsrrtKr<i» 1010/ 

iUC PmSSTWO PH0<i.Lti^t>Tri=l!b**o6 

iUC SYi'llrfLt. pHUvi.Lt'^tiTrisuUUyl 

C.C. KtCOKiJ»SrAKI£ 

t = Ca UHlGi'M?i! AK(^»10107 

lUC CH!' HHOli.Lti^^iTHSl^OUb 

C.C. i-<uCOHUiSVMH (ii 

C.C. uKj,iJiiM,siAKr«;,3207 

IUC FlNi Hr<0(j.Ltf'i(3TM=l Fo fJ 

C.C. '<t;cortu»i>rA^T(i. 

C.C. UKit>ii>i»c>iAHT-^»ll<i34 

iiH; f(N<i . HKOU.L£f^iirH=lbOoJ 

C.C. r<tCijKU , S 1 AK i «i 

C.C 0!-ii61N«-iirtnT«it4355 

iuC FT'MJ HH0b.LEi^tjrH=l<iO5b 

C.C. i-(LCOHu»srAHTtf: 

C-C UKlbi!^<»srAKl<;»43ba 

IUC FliM4 PHUo.LENGTr(=iao<tJ. 

C.C. KtCOKj.SlMf^T^ 

C.C. uKl(Jl:N»»Slrii^T<i»'f4J7 

i.\JK. F ho r'KU(i,Lt;r><vjTri=i3*v>3 

c-c. Ktcurtu»srAHT<; 

C.C UKl'iI'^»SlAKr/i»*43? 

lUC FlfMt) K'rtOii.Lfc.NeTH=li/Jy 

C.C KtcoHL)»sTAHr<; 

C.C UHiijliJ»i.lAHl,i»43*r 

iUC Fi'Nlt ^'^<0t).Lt^'4(irH=ii>^<i^ 

cc t-xut 

C.C rftHLACt 

C-C UNlT»33»rtUUMH 

(,.C. uJUr»Ob»PKtL0AL) 

C.C u!Mir»3btCKKec 

cc u.MlT»3b»0VPKU 

C.C U-Mll ♦3t>»PKUTtCT 

IL'C Cu.-iHrtSSd Pf<Uii.L£NyTM=00vio2 

Lcu bbOl 

C.C O.aT.bbtPrtuTtCT 

CC UiMi ftobtFlNO 

CC UNlTjbbt COMPASS 

C.C UrJll »bb»U''t.HtUAYl 

C.C Us^iT»3b»PASS0N£ 

C.C UNI f »3b»PASST*0 

C.C Ui\lir»b3»CKT 

j,i^C FUKlKrtN PHOG,LEN<3TH=00*^D^ 

LLiJ bi)0i»3b(/l 

C.C. Ooiil »3b»PrtaltCT 

C.C. UfJl r«bb»FTiMO 

C.C. UNlT»bb»FlNl 

CC. Jul r»3b»FTi^i^ 

C.C OHlT»bb«F rN3 

C.C Ui41 r»iib»FTN4 

C.C yNiT»3b»F (Hb 



60237000 



PAG£ * 



C.C. 

C.C. 

lUC 

LtO 

lUC 

lUC 

lUC 

lUC 

IOC 

luc 
luc 
lUC 
luC 
lUC 
iUC 

IUC 

IUC 

IUC 

IUC 

XUC 

IUC 

IUC 

IUC 

C.C. 

IUC 

IUC 

IUC 

IUC 

IUC 

IUC 

C.C. 



UiMlT»3b»FrNb 
UNiTibStFTNE 
COBOL PHOG,LeN6TH=0l2ol 

RaAH PHOe.LENGTH=000«tJ 
SCAK PHOG.LEWGTM=OUJ'*0 
MTWPM PH06.LENGTH=00010 
MTrtPR PHOG.LENtirM=UUO<io 
MTLUmCPh PKOG.LENerHsOOUlO 
MlUtK PrtOG.LeNGrM=000<iO 
PHCPK PHOG.LENGTHsOOOlb 
CHUtK P«OG.LENGrH=00(i'tl 
CPULrt PKOG.LENGTH=00113 
MfWPrtH PHOG.LENGTH=OUJJ5 
MTHPKH PHOG,LENGThl=0Oi;i4 
MTLUCPkH PHOG,LEN6TH=00i^3 
CMNrtTNS P«06.L£NGTH=OOkffO 
WHAIISIT PROG,LtNGTM=0yJJ3 
mo Pi<06.LENGTH300ii:2 

NhC PHOG.LENGTrisOUiiii 
Ni*rt * PHOG,LENGTH=0dUb4 
T.NUrHUY PrtUG.LEiVGrM=000J2 
TYPEOUT. PHOe.LENGTri=00i;o7 
WriAlKIHiJ PKOG.LENGTH=00UJ7 

UNir»b5»PK0T£CT 
COdULIt PHUG,LENGTH=0oU'i7 
PrtOG.LeiNGTM=0bo3I 
PHOG.LENGTH=0bO«:7 
PKOU.LENGTH=0Jt»^3 
P«0G.LEiMGTH=0S7o6 
PHOG.LENGTH=0bi:35 



COaOLUi 

COdULPi 

C0B0UU2 

C0U0LP2 

COriOLOP3 
MACHUtCOMAC 
MACRU HEAOb 
MACHO WRITES 
MACRO REAUd 
MACRO REi^INU 
MACRO UNLUAO 
MACRO BKSP 
MACRO SEFF 
MACRO SEFd 

macro weof 

macrjo erase 

macro status 

macro format 

macro transmit 

macro euit. 

macro compare 

macro multiply 

macro UlVIUE 

MACRO FILLUESC 

MACRO LAdELlNG 

•IaCRO VARlAtiLE 

MACRO STOPOPEN 

MACRO REAU 

MACRO WRITE 
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PHtit 



'1ACH0 
MACRO 



KtitKVC. 

CLJSt 
wrtMfMWu 
LOniMtJ 
SCmh 

SCMKiMM 

.MrtJ 



c.c. 

C»C. 

c»i;. 
luc 

iUC 

lUC 
XuC 
luC 
iUC 
iuC 
IUC 
iUC 
IUC 

IUC 
iUC 
i'.^C 
IUC 
iuC 
iUC 

IUC 

IUC 
IUC 
lu»C 
JtJC 
IUC 
iuC 
luC 
xuC 
IUC 
IuC 
IUC 
IUC 
iuC 
IUC 
IUC 
luc 
ioC 
IUC 
luC 
toe 

iUC 

IUC 
U'C 



U.<llT»3b»(JHortCT 
Ji>ilT»t3t)»PHt;LUA0 
OiJlT♦^^^C^K£C 

U JI r»3b»pK(jfcCT 
HAtCUVrs PrtOG,LEi><brH= 
PHOb.LtiNOTHs 

PKuG.L£N(jfH= 
f*p<OG.L£NtiTH= 

HrtUb.LtNGTHs 
HrtOG.Lti^eTHs 
PH06.Lt.>NGrt1= 
PHOtj.Lfci^GrH= 
PHOG. UENGTMs 
PHOG.LE'^GTHs 
PKOG.L£MGTH= 
PHuG.LtiNGTMs 
PHOG.LC'NGTHs 
HrtUG, LENGTHS 
PKOG.LENGfHs 
PHOG.LttNbTHs 
PKOG. LENGTH' 
PrtOG.Lt <GThs 
PKOG-.LENGTH= 
PKOG, LENGTHS 
PrtOG. LENGTH' 
HrtOG.LEt^GTHs 
PHUG. LENGTHS 
PriUG. length: 
HrtJG, LENGTHS 
PHOG. LENGTHS 
PrfOG. LENGTH' 
PHOG, LENGTH' 



FLOVtH 
aCUi -JP 
rtCUUUT 

bUFrtH 
UiM I ( 
lOCHK 

EOKCH^ 

TMptrtM.'lU 
P.AUSt 

CUN.I rtOL 

DOUBLE 

OFPKIME 

OFP 

QIUmDHi 

IfOJ 

iro^ 

XIUl 
PUWHF 

Si NCOS 

ATAnF 

EXPF 

L06F 

SIGNF 

Swr( I F 

AbSF 

E^TKLMAi 

EAlXtMAii 

FLOMlF 

FlAh 

HASMnGF 

FAULTS 

SENbUrt 

SENSwTCH 

QfaOtPKoH 

HmaH 

SCArt 
MrwPH 



PrtOG. LENGTH: 
PKOG, LENGTH! 
PKOQ. LENGTH' 
PHuG, LENGTH! 
PrtOG. LENGTH' 
PHOG.LENbTH' 
PrtUij, LENGTH! 



ouiJ7 

1 1> I 

UlbJl 
OiOUb 

0U«3O 

OUOob 
OOwol 

oyo/<; 

Oliiai 
OOioi 
OOlo? 
OOUib 

00313 
OUlti 
00131 

OOOib 
Oullo 
Ouuiu 
001 J<i 
OOOoo 

ooo«:ir 

00U30 

ooo-ti 

OUUJf 
'OOlou 
OOOol 
OOUJ 

ioouto 

'OUOIU 
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H«u£ 



lUC 


MfKKn 


PROG.LENGTH=OOU<iO 


iuC 


MTLUACFH 


PRUG.LtNGTM=OOUlo 


luc 


MTUtH 


PROG.L£iN(jTH=O0y^O 


iUC 


PrtCPH 


PROG.LENGTHsoOUiO 


-IUC 


CKDtK 


PHOG.LErt6TH=000*H 


iOC 


CHOtrt 


PROG.L£WGTH=00li3 


IUC 


MTWfRR 


PR06.L£WGTH=003J5 


iuc 


mTkHHK 


PKOG.LEi^GTrt^OOii* 


IUC 


mtldcprh 


PR0G,LENGTH»001<i3 


IUC 


CHNrtTHS 


PR06.LtN<sTM=00<i /O 


IUC 


WHATISIT 


PROe.LENGTM=003J3 


IUC 


(MrtlJ 


PROG,LENGTH=00i<;^ 


IUC 


NWC 


Pr<OG.LeNGTH=00iX<i 


IUC 


N«H 


PROG.LE'^GTH=0U034 


IUC 


T.NOTHOY 


PR06.LEN6TH=UOOJ2- 


IUC 


TYPtOUr. 


PHOG.L£NGfM=00<JO^ 


IUC 


WHATKINU 


PROG.LENGTH=00yJ7 


IUC 


FUPbOXS 


PROG.L£NGTH=Oiios 


IUC 


OPTBOAS 


PROG.LENGTH=00035 


IUC 


BCOBUXS 


PROG,LeWGTH=0U*f^ 


C*C. 


UNlTtSbi 


PKOfECT 


IUC 


REStArtT 


PKyG.L£NGTH=03J00 


IUC 


ERRSTOP 


PR06.LENGTH=00(;«i7 


IUC 


OPtMHPT 


PrtOG«L£NGTH=00uyb 


IUC 


OPE'^orPT 


PROG.LEnGTH=O0Oj6 


IUC 


REAU 


PROG.LENGTMsOOOti-* 


IUC 


WHITE 


PROG,L£N6TH=O00Uf 


IUC 


HtAUI 


PrtOG,L£NeTH=00Uu4 


IUC 


WKITEF 


PHOG.LESM6TH=O00u* 


IUC 


EAAMINt 


PROG.LENGTH=00iU 


IUC 


SUBSCRP 


PROG.L£NGTH=00043 


IUC 


ACCEPT 


PHOG,LENGTH=OOIJI 


IUC 


DISPLAY 


PROG.LENGrH=00«:ii2 


IUC 


COHVERl 


PH0e.LtiMGTH=0Uio3 


IUC 


GPIOMASr 


PROG.LENGTHsOiboI 


iLiC 


CLOSE 


PROG.LENGTH=O0I6b 


IUC 


STACKING 


PKOG.LEIMGTH=00^02 


IUC 


RERUN 


PROG.L£NGTH=00<i/l 


IUC 


MBRULAaS 


PROG.L£NGTH=00Ia2 


IUC 


LABLaREA 


PR0G.LEnGTH=U0U24 


IUC 


MbwTBSTL 


PROG.L£NGTH=000/5 


IUC 


MbHUBNSL 


PROG.L£m6TM=00023 


IUC 


WRTBNSL 


PR0G,L£NtjTH=00020 


IUC 


MBVARREC 


PKOG.L£NGTH=OOOJ* 


IUC 


MBRMSRCH 


PK06.L£NGTH=0003i 


IUC 


KiBSaPKUC 


prog.lengt;h=ooo32 


IUC 


MBMFPRUC 


PROG,LEN6Tti=000'»2 


IUC 


MBMFIN 


PR06.LENGTM=OUU'*2 


IUC 


MBMFOUT 


PRUG.LElMGTH=00Ui6 


IUC 


JVC0M2 


PROG,LENGTM=0UOi2 


IUC 


JVNUALI 


PROG.L£NGTH=0OilO 


IUC 


MBOPTFIL 


PKOG.LENGTHsOUOcIS 


IUC 


TKANSMIT 


PROG,LENGTM=OOIU3 


IUC 


FIGCUN . 


PROG.L£NeTM=0UU33 


IUC 


COMPARE 


PROG.LENGTH=00Il/6 
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pH\3C 



ii-'C 


Eull 


luC 


eoncuoL 


ii^C 


MULIIPUY 


iuL 


DlViUt. 


luc 


diMUUTHUY 


iuC 


BuIvlUt 


XuC 


DHMULUiV 


luC 


SfrtiPPtrt 


iuC 


BSIKIPHK 


luc 


Df:euiT 


IUC 


NUrttrilC 


iUC 


AL^'nAtttV 


luc 


MVHitiCOlM 


iUC 


VmkCI 


luC 


tfAHN 


IOC 


VMrtMi'^ 


IUC 


WOUixOtrt 


luc 


CUiNVtrtI 


lUC 


ZlPh-trt 


iuC 


FuPouXa 


lUC 


OHTaOAi 


iuc 


bCUisUXS 


luc 


SOKl " 


iUL 


SuumP 


luC 


BlriANUtC 


luC 


SKtHKii'll 


IUC 


iiAllcittH 


IUC 


KAAK 


iUC 


SCAK 


iuC 


mT'jkhk 


iuC 


HIKKK 


luc 


HTLUACKHt 


IUC 


HlUtK 


iuC 


PftCKK 


iuC 


CHDtH 


iuC 


Cf^Otri 


IUC 


mTwhkh 


IUC 


MrHHrtK 


iuC 


MfLUCPKH 


IUC 


CrtNKTiNS 


IUC 


WHAT ISIT 


luC 


NHL) 


luC 


NKC 


luC 


NWK 


iuC 


T.t>iurHijY 


IUC 


TYVfcOUl . 


iuc 


MnAlKll>*L) 


CC 


UNI It 3b 


c.c. 


UinI r*3b 


L.C. 


UrtiTtob 


IUC 


KtsiAKn 


luC 


SKtiTArtT 


iuL 


SOrifiOPd 


IUC 


SUUMH 


lUC 


OiNAiNiUtC 



PHOb.LtiNoTHs 
l-'wOt>.l.t.iMt(Th = 

PHOG.LItt^iiiTHs 
HKu(i.Lt.Nt>Tn= 
HKOG.LENiSTHs 

KKOt>.Ltwoin= 

HHU(i,_LtiN6TH= 

HK06.LtWiJTrt= 
Pf<0(j.LeiNtiTH= 
H«U(i,LtN6TH= 
PKOb.LtNbrHs 
KKOO.LtiNCjTris 
HHOij.LtwGlrif 
HrtOC>.LtNeTrt= 

PKOb.LeHtirh= 

HKOe.uEwGTHs 

HKO(i.Lt.NeTH= 

PHOb,L£NfarH= 

HHOb, LENGTHS 
PHlOb.LtNGTM! 
Ht<Oti.LtlNbTn= 
HKOG,Ltr'«GTM= 
HHu(j,L£.NoTri= 
PrtOb.LtNGTl-i: 
Pr(Ou,LtNGTH= 
HHUG.LtNGTn= 
PHOG.LtNGlH= 
KHOG. LENGTH' 
KKOG.LtNGTH' 
KHOG. LENGTHS 
PHOG. LENGTHS 
PkUG. LENGTH! 
HHOiJ. LENGTH! 
PkOo, LENGTH! 
HHOGiLENGTH! 
PrtOb. LENGTHS 
P«OG»L£NGTHs 
PkOG. LENGTHS 
PKOii. LENGTHS 
PKOtj. LENGTHS 
PHOtj. LENGTHS 
PrtOG. LENGTH! 
PkOG, LENGTH! 

fpKOTfcCT 

tCKwEC 

fOVpKU 

PhOG.LENGTh! 
PhOG. LENGTH! 
pKUG.LENbTH! 
PhOii, LENGTH' 
PHUti. LENGTH! 



OUlub 

OOUoV 
OOObo 

oub/u 

uui<;u 
OOUoO 

UOOJi 

Uuu:»4 
Ouubi 
00104 
OOUub 
Oulbj 

Oiisb 
OOiibb 

00442 

jb40 

■OOiJb 

OUU^O 

•OU J4u 
'Ouifio 
lOOOiU 

00u«iu 

■00041 
i001i3 
OOJJb 

:ou<::x4 
i00i<i3 

•003J3 
■■iiiiiCc. 
'OOiic: 

■00U3'* 
■U0UJ2 

'000J7 



ouij^i 
oiijy 

U4JU0 

OOi-Jb 
OOu /u 
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HaOc 



iUC SKft^HlMC HKUb.LENGTh=UO£:'*J 

luC SHTtUOAL FrtOti.LtNwTH=00c45 

LoC UMllfcifctP KKUo.LENbTrisOuuoi) 

C.C. urtiT»Db»CKH£C 

C.C. UiMiTibtj.UVfirtO 

iuC SUHieUAf Hh<Ub,L£i^viTH=077^b 

C.C. uia rti)b»CKrttc 

C.C. uiMiTfSbtUVPrtc 

C.C. u,^aT»^^»C^Ht:C 

C.C. ui><i ItabtUVPHu 

lUC SOHIPUHY HH06.L£NeTM=uOU/6 

liJC SUKfHUUY PKO(i.LtNGTH=Oi>iiai 

IUC SOririOPl PrtOG.L£NGlMSO<io-Jt) 

luC SOKlPriSi HH0b,L£NeTh=u2l r2 

C.C. UMI»3b»CKH£C 

C.C. UNlTtSb.OVPKO 

C.C. UNlT»bb.CKr<eC 

C.C. UNil »b3»0VPH0 

iuC ShTNomlF P«OG.L£N(3TH=0O0y7 

iUC SHTMbALd Pt<Oti,LENGTil=u00y7 

lUC SKIrtPULF Pf<OG.LtNGTH=0U0u? 

ii^C ShTf-iPOcts pKUe,L£i^GIM=UJUU7 

1L»C SPfKbALri Pri0to.LE^viTn=0uoo3 

iuC SHlnelAut- PHOG.lENGTH = 0O0uj 

IUC SHTmPOcK PrtOti.LENGTH=0O0uj 

iuC ShiKPOLb PH06.LENGTri=OOOUJ 

luC SUHTiOPi; Pr(0v3.L£rMoTrl=04Juu 

lot SrttSTAKf pKOt7,L£lMGrM = uiiJ7 

iuC SHTEijUrtL PHOG,L£NoTrt=00<i'tb 

luC riALCKOK* PrtOG,LENorn=o<d<ir/ 

li-C omLCoACK PwOo.L£iiioTh=0^<K'o 

IUC PULtfOrt* PrtOu.LEt"<GTH=U^iou 

lUC PuLtbACK PrtOG.L£i^bri1=023uu 

C.C. Ui»iT»bb»Pr<urECT 

IOC SIPP PH0G.LEnGTH=0oIvj7 

IUC BSJiPP PrtOG.LENGTrt=ll«;o7 

luC SAINT PH0G.UENGTH=u4ooi 

iuC 10PAC^ Pr(OG.LENeTn=00«fui 

IUC lOUrlAllV PriUG,L£NbTrt=OUU<i^ 

IUC SnaPSMUT Pr(oG.LEf»GTH=Ol*bO 

luC CUSY PKOG.LEfN6TH=0biJi 

iuC COSrHUwf PrtOG.LtNGTHsOiao/' 

MAIN bb 

luC pKtUd Pr(OGrL£NGrn=00O^3 

IUC HAAH PkOG.LEn6TH=00O^U 

IUC SCak PKOG.L£NGTH=OOJ«.0 

luC MtKiPrt PPOG.LENGTHsOOUlu 

luC MirtPrt PrtOG.LEWGfrisoUUiiO 

luC MTLUACPH PKOG,LEN6TH=u00iO 

IUC mTUck PHOu,LEi^GTM=OOUc!iO 

IUC PkCPk PW06.LENGTH=00016 

lUC CkDlk Pr<0G.LEwGTri=UiiU4l 

luC CPOLK PHOG.LENGTri=00UJ 

IUC MfwPhrt PHoG.LENGTri=0u3Js 

luC MTHPKrt PKoG.UENGTH=00ii4 
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KHOfc 



lut 


i-iituCPrtH 


PKtj&.Lti>i<3rH=U0i<i3 


LUL 


Ci'iN^^ 1 iMi 


PH0l3.LtWbTH = 0u2/iJ 


lUC 


-HArisi 1 


pHU(j.L£f^C>Tn=0 333 


IOC 


'^rSU 


p«oo4LtiSbrH=yol<i2 


luc 


NriC 


PN0eiLEWeTH=001l2 


1L>C 


NWW 


PrtOti.LE^ioTHsouUa* 


ILIC 


1 .NOTrtUT 


PKUli.Lt.NbTH=0UU32 


iUC 


TYh'tUUl . 


PROG.l,tNtilrt=0OiJ/ 


luC 


wbAI'Kl'^U 


PH0tJ.LtNGTH=0J03/ 


luC 


PkElIB 


PHOb.L£NGTH=U'JUgu 


ov 


S)b»l»i 


OVtKLAY I 


li*C 


♦^LOVIoll 


PKUG.Lt.NGrri=0UbJ6 


uv 


5b»afo 


OVtKLAr «; 


li^C 


UVl 


PKUti,L£NeTMso<ii32 


btCi 


bb»l»i) 


SEtiMt'^i 1 


luC 


PnAbfcl ' 


PHO^^.LtNGr^i=Oi*ol 


Sto 


5b^^^b 


St^Jrit'Nj i d 


luC 


priASt^ 


PH0e.LEi^tirH=UU3o4 


Ov 


bb»3»s 


OVtKLAY J 


lUC 


Dt.BLUC^ 


PHO(j.LtN*jrri=0OiU7 


UV 


bbf4»b 


OVtRLMlf H 


luC 


PLUw^ 


Pf<oe.Lt.NtirH=o*ioi* 


MM 1 Ij 


bb 




lUC 


KOriAiN 


PHOb.LtNtiTH=00lD6 


UV 


bb.i.a 




IL/C 


KUOVi 


PKOli.LEN<irH=030lb 


Stb 


bb.lfi 




ILlC 


><(3FlLt 


PHj(i,L£iN6Trt=0b0b6 


Sfct. 


bb»2tS 




lUC 


KbHcPOKl 


PHOb.LENb rii=UbJf 4 


bto 


bb»3.s 




iUC 


»<tjKKO 


PKU(i.LEiMGtH=0bOO7 


uy 


bb»2.i 




ioC 


RbCOWP 


PHUt».LtNGrH=OJi;40 


Stb 


bbfltS 




loC 


KwHuNt 


PKUi3.LewGrM=04/bl 


stt. 


bbt^.i 




HJC 


KbPfWO 


PK0b.LENGTh=0bbo4 


St(j 


bb»3.6 




iL*C 


kGCkT 


PWOG.LENt.Th=Uit><'J 


luC 


K*jHIS 


PKOG.L£iMt>TM=0U0U2 


cc. 


UN 1 V 1 b5 1 


iPrtOfECT 


IL/C 


KbACCfcPT 


PKue.LENeTH=00i7l 


iLlC 


HbO 


PK0i3.LtiNGTH=i2J37 


cc. 


U.Nin »bb< 


iPHOrECT 


cc. 


UNi 1 tbbi 


iPHELUAD 


cc. 


Ui\iir»bbi 


iCKPEC 


cc 


UiMiTfbbi 


iOVPku 


cc 


urvi,T»bbi 


iPKOTECT 


luc 


FDPfcOXS 


PMOG.LENfc>rrt=olAbb 


IOC 


OpToOXS 


PKyG.LEiN(jTH=00U35 


lUC 


ttCuoOAS 


PKOG.LENGTHsou^-t^ 


It'C 


uriLiTY 


PHOG.LENGTrisob^Ut) 


iuc 


CIOl 


PHUG.LtNGTH=OOOOl 


cc. 


UiMiFtbbi 


.pKortCT 



DUZSYUUU 
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PmoE lu 



luc 


CUPTS 


PROlJ,LENGTH=00'H5b 


luC 


COPYT 


PH06.LtNGTii=0Ob^b 


lUC 


VERIFY 


PROG. lEN6TH=01 123 


iUC 


domp 


PRO6.L£NeTH=00437 


IOC 


COPY»(S 


PKOO.LENGTH=01U35 


luC 


CUPYTSU 


PK06.L£NeTH=00 / J4 


iUC 


EHKOH 


PROe.LENeTH=002^4 


cc. 


UNiT»!>Si 


.PROTECT 


c.c. 


FILE 




EOF 
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4, 1. 2 PRELIB SOURCE FOR BATCH 



PMofc. 



c.c. 


S£iiiUENCE,003 


c*c. 


joo« » » » ♦ 


c.c. 


e.UUlP,55=hT»05abb 


c.c. 


tQUlP»I=MT 


c.c. 


PKtLld,»l 


c.c. 


REPLACE 


c.c. 


RtCOHU»0 


c.c. 


OKIGIN»0 


luc 


ZEHO PHue.LENeTH=00OO0 


luC 


8CIU PK06.L£NerH=01b*0 


luc 


OKIVEKOl PKOG.LEN(jTH=00J*4 


iUC 


UKlVEHOi PHO(i.L£N(>TH=003J0 


luc 


DHlVEKOii PKOG,LEiMtiTH=002*i) 


IOC 


DRlv£Ho2 PKUG.L£N(3TH=00<iJb 


IUC 


UHIVER03 PKOG.LENeTH=00J3b 


IUC 


DHvsi^ PKue.LENeTM=oo*y6 


IUC 


DKIVEK04 PHO6.LeN6TH=00i:/i2 


IUC 


0RIVEHU4 PKUG.L£N6TM=6o3<fD 


IUC 


UPIVEHob PwOG.LeNGTM=00lli> 


it^C 


OHIVEKii PHOG.LEnGThsOOOoO 


IUC 


LJrtlvEN12 PHOG,L£NGTrt=00JJ0 


IUC 


DKIw36yi PKUUi.LtNGTM=00o^6 


C.c. 


REPLACEHCNI 


C.c 


KtCUrtU. STARTS 


C.c. 


0«iGiiM»STAPT2 


IUC 


roump pKoe.L£NeTM=ouso4 


c.c. 


R£C0RU»brART2 


c.c. 


ORiGINfSTAwTg 


EXS 


LBUF=START2 


IUC 


PKELOAU PROG. L£NGTH=U 113 


tAS 


£NUPROT=POSrL0AD 


c.c. 


RECORU. STARTS 


c.c. 


ORIGIN, START2 


IUC 


CKRtC PHO6.L£NGTh=00ouo 


tAb 


CIUPCALL=AtiNUKMAL 


IUC 


LOAUER PROe,LEN6Tri=04/i6 


C.c. 


S£P0INT,BCUBOXS 


C.C, 


SEPOINT.FUPBOXS 


c.c. 


StPOINT, ABNORMAL 


c.c. 


S£P0INT» ACCOUNTS 


c.c. 


SEPOlNT.Atr 


c.c. 


SEPjOIimT.BERRAOO 


c.c. 


SEKHnTjBKEXIT 


c.c. 


SEPUlNTtbKRUNFLG 


c.c. 


. SEPOiwT.BNJ, 


c.c. 


. StPOliNTtbRhT 


c.c. 


. S£POl»lT,CiO 


c.c. 


. S£POIi>lT»CIC3.01 


c.c. 


. SEPOloiT.ClP 


c.c. 


. SEPOlNTfCIf 


c.c 


, S£POI'»<f,Clf.RTrt 


c.c 


. S£POIi^T»CSr 
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H^^taC. 



c.c. st.t-uli^r.£iNT. 

C.C. stHUiiMi »ti>r . 

CC. St^^Ult^<T»GOFL.ti 

c.c. bEHOt'>i( »L<JrtUt« 

C.C. StKUI>^T»LUCD 

CC. SfcHOiiMi»i«'t>10KY 

CC. St^^UIlN^»M^cl^AOD 

CC St'^Uii'lTjMltJUF 

C.C. bt*'Uli^r,Ml(-UHADO 

CC. ifcHOlNl fNUtXIT 

C'C. SC.KUlNr»Pt.MKAUL) 

C.C $tPuI.>(T .kUCKH 

C.C. bt^'Ul'^l fHrii 

C.C. bfcHOjNl»KlO 

C.C 6tHUiiMl .SIrtr<T2 

G.C StHUiiXl lUST 

C.C KtCOKutLSlLoTH 

C.C. OHiolNtLSTLOTH 

luc OvHnO HHOG,LtNbTH=0<iJUD 

CC. KhCOKUfdli^lbUF 

C.C UKltiliVtblNbUF 

luc PHOiecf VK06.LeNfaTH=oo<;/5 

iUC PUSILOAU PrtUb.L£NC»TH=UJOJH 

C.C ktcurtu»srARrk; 

C.C. (jHXiiiNtsrArtr<i 

U'C FINO ^'KOG.LENGTH=00OlJ^ 

lUC t^AAH H«Ob.LtN(5rH=OUO'+0 

iUC SCArt PK0ti.L£N6TH=00i4u 

l-JC MlwPK Pr(Ub.LtNGTH=OOUlU 

luc MlKPX PKOG,LtNtiTri=00U<:o 

luC r-HLUACPK PrtOG.LtNGTHSQUOiU 

•llJC 1-nut.K PhuG.lENGTm=OOOcO 

IUC PKCPH PK0G.LENGrM=00UiO 

luc CKDtrt PKoe.LtNGTH=00O*l 

luc CPUtrt PHOG.LENGTH=00iiJ 

luc MfwPKR PHOG.LeNGTh=003J5 

IUC mTKPHH PKUG.Ut.NGTrt=00<;i't 

luc MrLUCPrtri PHOG.LEn6TM=001^3 

IUC CrtNwTiilb PKgG,LtNGTH=00«:^U 

luc WMAHSIT PKOG.LENGCMSOUJja 

lUC iMKO PHue.L£«GTH=001<:2 

IUC NKC PHOe.LENGTH=U0H2 

luc iMWK PHUG.LeNGTM=00034 

luC T.NyTKUY PkOG,LEN6TH=O0uJ2 

IUC TYPtOUr. PHOG.LENGTHS002U? 

IUC WMAiKli^O PwOG,L£NeTh=00OJ7 

IUC PKOGNrtiv(E PHiJG.LEnGTM=0U004 

C.C h£cOHU»srAHT2 

CC. UKiGlN.bTMHT2»32u7 

IUC CUmPaSS PKUG.LtiNGTH=lUH/7 

CC. KtCOHUtSf Awr2 

C.C UHlGlN»srA.^T2ilO107 

luC OVtHLAYl pK0G.L£NGTh=lil43 

C.C k£Ct)HL)»STA«r2 
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HrtCit 



C.C. KLCUKUti)! Aril2 

ibC HAbiiTWU HrtOfci,Lt.'*'GTH=lb4ofa 

iuC StMTriLt J^rtOb.LtNtiTrt-UOUui 

C.C. KtCOKUjSl Ar(i<i: 

CC. UKidiNsSrAriTiislOiOy 

IUC CmT Pr(Oti.LtN&TM=l<jOOt 

C.C. KtCUKU»Si AKi2 

C.C. 0KHJlN»brART<i»320/ 

IUC FliMl Hr<0b.Lti^o(h=i70/j 

C.C. KLCOHU»b(AKT<i 

C.C. 0KlolN»brAKr2»ii234 

J,uC FlNt PKOui.Lt.'MOrHsioooJ 

C.C. Kfc.COr<J»ai akF*: 

CC. 0KiGl'>»»i>VArtr2»43bb 

CC rttCOKUtSl Ai-iT<: 

C.C uKidii'^»:>f AnT^t^Jbb 

C-C KFCUKU.bi ART2 

C.C UKltiliM»bf AKT2»4437 

WC Fr.>i3 h'KUO.LfcNbTHsiJ'tUj 

CC. H£CUHU»bTAKl<; 

CC, UriliilN»SlAHT2»A-437 

IUC FTiXiO PH06.LtN6Tri=lirUu 

C.C. KlCuHUiSI Artfii: 

C.C UKiCjlN»bl"AK(2»4347 

iuC Fl.'^it Fr<0C».Lew<iTn=lb<:<i2 

C.C Fi.Lt 

C.C. KLeuACt 

CC. Ui>)l I ♦D3»f<UUMP 

CC. Ui^JirfSbfPHtLOAD 

C.C uNiT»^^^C^K£C 

C.C UNil tSiitOVPKU 

CC u.\lftbb»PKOlLCT 

iuC CUiieAbbb PKOG.LtMCjTHsouose; 

Ltu bbui 

C.C u.'<iT»bb»K'KUTt:CT 

C.C UNiT»S3»FlNU 

C.C Ui\lT»3b»COMPASS 

C.C. UNiT»3b»0vtrtLAri 

C.C UiNiTtobfPASSUNE 

C.C uiMiTtor>»HASSlwO 

C.C. uiNir»ob»CKl 

IUC FOKlHAN PK0(j.Lti>iwTri=00*o2 

Ltu bDUliooOl 

C.C uNirob»H«ortcT 

C.C UiMl f OSpjFTNO 
C.C UNlT»3b»FTNl 
C.C. UHiT»S3»FTN<i 

CC. UNlT»33»FhN3 

C.C UHlT»3b»FTN* 
C.C. UNlT»3b»FTNb 
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c.c 
cc. 

luC 
Ltu 
iUC 
XUC 
luC 
iUC 
luC 
iuC 
IUC 

IUC 
IUC 
iuC 
iuC 
IUC 
IUC 
XUC 
iuC 
IUC 
iuc 

IuC 

IUC 

IUC 

C.C. 

luC 

IUC 

IUC 

iuC 

IUC 

IUC 

C.C. 



UoliTfbbjFTiNtJ 
UiMiT»ab»FTi>)t 

COBOL P+<oe.LtiMGTh=oi<:uj 

b4ul»asJi 



RAAti 
SCak 

MlHPH 

MILUACPk 

mTuck 

PKCP^< 

CHutK 

CHUtK 

Ml wKriH 

NTHHHH 

MTLUCHKH 

CMWrtTNS 

MHAi isir 

NKC 
NWk 

T.mOfHUY . 
TYHtOUf , 
WriAiKlNU 



KKOG. 

HhOG. 
PHIOG. 

fhiOG, 
HHOG. 
HKOG. 
PrtOG. 
PHOG. 
PrtOG. 
KHOG. 
PhtOG. 
PK06. 
H«UG. 
PKOb. 
PrtOG, 

PKOll. 

•P«OG, 
PrIOo, 



U.>jiT»Sb»PKUTc.C 
CUtjOuIc PKOii. 
COriOLUi PKOG, 
COdOLPl PrtUG, 
CObULUii PKUG. 

CotsULPc: PHOG. 

CUbULUPJ PrtOG. 
maCKU«COmaC 
i-lrtCKO HIlAOi) 

MACrtu wrtiitS 

maCKO rttAOB 

iiMCHiO Ht*IiJU 

rlACRU UNLOAU 

HMCrtU dKiP 

HACt<o set-T 

MACrtO SEKo 

MACHO nitOf 

iirtCKO trtASt 

ilACKU STAfOS 

.ImCHO K^rtMM r 

MACRO TRANSMIT 

MACHO toil. 

MACRO COMPAHt 

MACHiJ MULTIPLY 

MACRO oivioe 

rtACKO FiLtUtSC 

MACHO LAdELIiMG 

MmCHU VAKIaolE 

MaCHO SlOPOPtiM 

MACRO HtAO 

MACKO WHirt 



L£i^GTH= 

Le.»iGlM= 

LfctNGThs 

LtNGTMs 

Lfci^GTHs 

lEnGtms 

LtNGThs 

Lt^GlH= 

L£NGTH! 

LENOTns 

LEiNGTH! 

LEUGlhs 

length; 

LtNGTris 

LtiNGTH= 

LEnGTm* 

LENGTHS 

L£iNGTrt= 

LENGTHS 

LENGTHS 

T 

LENGTHS 

LENGTHS 

LtNbTHs 

LENGTHS 

LENGTHS 

LENtjFHs 



UUOiO 

OOOib 
UOiX J 

vMdm 

Ouiii 
OOJJo 

00uo4 

UOUi/ 
0OU3I 

Obo«;/ 

Obisa 
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PAbt 






CLObc 
wriA i'KlHO 
UUWKtJ 



c.c. 
c*c • 
c,c. 
c.c. 
cc. 

iuC 
iuc 
lUC 
iUC 
iOC 
loC 
iUC 
luC 
iuC 
IUC 
iUC 

lUC 
i^JC 
LUC 
iwC 
iiJC 
lUC 
luC 
lUC 
iuC 
iUC 
JIUC 
iUC 
iUC 
luC 

lijv': 

IMC 

iuc 

lUC 
iuC 
iUC 
luC 
iuC 
lUC 
iUC 
iuC 
iuC 
IUC 
tuC 
luC 



UNlTtsbff'rtOltCT 

lJ;MiT»33.CKHtC 

U.U I »3b»UVPHU 
UN4.1 »33»HK0(tCr 



EAH.OVr< 

FLOVtrt 

BCuiNH 

6Ci)yuT 

FukmmV 

rtI*iiArtr 

buKrtrt 

Ui-JI I 
lUCrtK 
EUFCHK 
THf^trlANU 

CO.>i I KUL 

UOuaUt 

L)KHKi.^c 

Qi\JMUrtl 
I lUJ 
1 (OA 
XI 01 
PJdHKF 

SiiJCoS 
AfA!>JF 

LOtil- 
S.lvii'iF 
SUf^TF 
AbSf 

tAfrtC^Mi 

tAJKtrtHiJ 

FlOaJF 

FiAr 

FrtOLfS 

StiibLlTt 
Se.<>lSwTCrt 

KAAK 

scak 



Hr<0G.Lt'^liirH=0UlJ7 
r'r<Ovi,Ut.NijTrl=UO<;jO 
Hrtu<j . Ut'^to Trt=0 i w i 
PH0(j,L£rtC»Tri=0l3Ji 

HHOG,.Ut;NGrrt=0iUub 
P«06.Lt<^QTH=OU*-Jl 

Hf<uii»LtNerH=oijii<t 

HrtUo.Ltt'iii rH=0Oi)33 

HHUtJ.LtNGTrt-OOuai 
Hrt0^i,LtNvirrt=0U-v>/2 
Hr<0ij,Lc.(NiJTH=0iJ^2 
HHOo.LtHbTn=0i<;i>4 
Hr<Oli»Lt:Nv>Th=Ui^uJ 
HHOo,LtNorM=OUioi 
PHOti.LtNGTHaoOio/ 
HKOb»Lt.(MGrn=0uyis 

PHO6.LtNt>Tr)=00i*t-l 
PKOe, Lt.NbTH=0O i J 1 
l-'rt0b.LtrtoVrl=0U^u2 
HrtOi3«L£NGTrt=oyUib 
HrtUtj.LtNijTri=Ui;ilu 
HrtOtJ^Lti^GTHaOOyiu 
r*riO6,LeNiiTrt=U0lw2 

Hf<06.L£noTri=OOU£:/ 

PKOw.LeNt3Trl=oOutl 
Pt<Ou.LciMbTH=UuoJ4 
f'rtUb.Lc.WtoTM=0UiOU 

^'rt0^3.Lt■Nt>rH=yOl /3 
r»p<Uo.L£NoTri=OUJ*y 
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r^Mtit 



ioC 


M(rt»^H 


iuC 


MILUACPK 


iuC 


MTutrt 


luC 


PriCHH 


IOC 


CHDtK 


iuC 


CPOtK 


IUC 


(■1 1 i//KHr< 


luC 


MTr<HK*^ 


iUC 


MlLUCPHK 


luC 


cmnkt<^s 


IUC 


WHAUSir 


IUC 


HH\J 


iuc 


NKC 


IUC 


Hi'iH 


luC 


T.NorKur 


IUC 


TYPtOUr. 


iUC 


rttlAlKliNU 


IUC 


FUHoOAij 


IUC 


UHTOOAS 


IUC 


SCUbOXS 


c.c. 


u.-(irfSb» 


IOC 


HtSlArtT 


IUC 


Ertrli)fUP 


IUC 


Oh'tWliNPT 


IUC 


OPciMurtT 


IUC 


i^tAU 


iUC 


wKiie 


IUC 


rttAUi 


IUC 


*p<I lEF 


iUC 


EAHMiNt 


IUC 


SUriSCrtP 


IUC 


ACCEPT 


IUC 


uiSPLAir 


IUC 


CUiMVErtI 


IUC 


GPIuHAal 


IUC 


CLOSE 


IUC 


STACKI.Jii 


IuC 


rtEKUW 


IUC 


MriHuLAdS 


IUC 


LaulaHEa 


IUC 


MdWldSIL 


IUC 


MdrtudNiL 


IUC 


WKTdNSL 


lUC 


MbVMhlHcC 


IUC 


MdrtMSHCH 


IUC 


MdSMPHUC 


lUC- 


MuHFPHUC 


luC 


MatAfl'A 


IUC 


MbMKOUf 


IUC 


J\/CO.--l<i 


iuC 


JVNOALI 


IUC 


MttOPTFiL 


IUC 


TrtAiMSMir 


IUC 


FliiCOw 


iuC 


CUMPAKE 



PHOb.LENefM 
PrtOia.LENbrn 
PriOb.LEMliTM 
Pr<Ob,LE!VeTH 
PHOS. LENGTH 
PKO^j'.LEwGTH 
PHOii.LEi^GTri 
PHOG, LENGTH 
P*^OG.LEi><GTH 
PKOG. LENGTH 
PHOG. LENGTH 
PHU(j, LENGTH 
PHUG. LENGTH 
PHUG.LtNGTH 
PHOG, LENGTH 
PHUG, LENGTH: 
PHOG. LENGTH' 
PHOG, LENGTH* 
PHOG, LENGTH' 
PHOG.LEi^GTh: 
PHOTECT 
PHOG, length: 
PHOG. LENGTH! 
PHuG, LENGTHS 
PHOG, LENGTHS 
PHOG, LENGTHS 
PHOG. LENGTHS 
PHOG. LENGTHS 
PHOG. LENGTHS 
PHOG, LENGTHS 
PHOG, LENGTHS 
PHOG, LENGTHS 
PHOG, LENGTHS 
PKOG, LENGTHS 
PHOG, LENGTHS 
PHOG, LENGTHS 
PHOG, LENGTHS 
PHOG, LENGTHS 
t'HOG, LENGTHS 

PHOG, LENGTHS 
PHOG,LE!XGTHs 
PHOG. LENGTHS 
PHOG. LENGTHS 
PHOG, LENGTHS 
PHOG. LENGTHS 
PHOG. LENGTHS 
PHOG. LENGTHS 
PHOG.LEtxGTHs 
PHOG, LENGTHS 
PHuG, LENGTHS 
PHOG. LENGTHS 
PHOG.L£n«GTHs 
PHOG. LENGTHS 
PHOG. LENGTHS 
PHOG. LENGTHS 



sooOiiu 
suOOiU 

soOOio 
soOO-*! 
siiOIiJ 
sOOJJD 

001<i3 

SOOJJJ 

sOOIIii 

SO0OJ7 

=00036 
!004t^ 

:03JuO 

= 00 JO 
•00OO6 
= 00o0<t. 
'000J4 

!00ovi<t, 
'OOOII4 
'Uulli 
ioooHj 

OOiJi 

OOIDJ 
Oibol 
OOiub 
O0/O4; 
\)i)dll 

00132 

uoo<:'* 

OOO^b 
OOOiiJ 
OOueto 
0OOJ4 

oooJi 

OOOJ^ 

OOo^t? 
OOOio 

uojid 
UUIIO 
ouo<i3 
OOI03 
00OJ3 
OOlJo 
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P«Gt 



lUC 


tull 


HHOG.LtNiirHsOuiUD 


ioc 


tUliCOoL 


HHOG.Lei>HiTtl=0U<;JJ 


lUC 


MJLflPuY 


PKOG.LENurH=OOU<j2 


ioc 


uivluic 


PrtOvj.L£<^tiTM=00UD/ 


{DC 


BMULTHLY 


PHOe«Le*VQTH=O0U3b 


lUC 


Bunijc; 


HHOy.LtiNGfrlsoouJj 


lUC 


DHMULOiV 


HKOli.LE'NGTHsOOo/O 


luC 


STKiPPtK 


Hrt0ti.Ltt'ii3Tri=0pCJO 


iuc 


aSTrtlHPH 


Pr<O(j,LeNuiTM = 0oili 


iuc 


Od£uU 


HrJua.LeNoTH=Oui<iU 


IOC 


NUfttHlC 


P«Ue«LENtiTH=OOaJi) 


l^C 


ALPrlAbc. i" 


Hrty^,LtN(jfH=Ol)Ooi 


IUC 


MVFieCUN 


PKOo,L£NGTrt=OOo<i3 


iuC 


V^KCI 


Hr<uG.L£NeTH=Oo»io'» 


iuC 


VArtN 


PRO<i,L£iNtJTH=0OO3l 


iUC 


\/MHlAl^j 


HHOb.LtNbTH=00i»i4 


IUC 


ROJi'JOEH 


HKOG.LENtiTHsQllUUb 


IuC 


COi>IV£Hl 


PrtOlJ,L£«oTrt=uulJj 


IUC 


ZIPHEK 


PHOu,u£N(3Th=0OiaJ 


IUC 


FQPbOXil 


PKOti,LEHGTri=oliab 


iuc 


OPTbOAi 


PHUo.LtN(3TH=0UUJt> 


iuc 


BCUsiOXi 


PHU'jsL£'N'oTH=oo«f^ii 


iUC 


SUKi 


HKU(j.Lt.NC>rH=003'nJ 


Il^C 


SUUflP 


PHoy.LtNGTHsguiJb 


IUC 


BlNAiMOcC 


PhtOG.L£NCJ rM=000 (0 


IUC 


SKTHKINT 


kKog. L£NGrM=ou<:H-j 


iuC 


WAlTBEtP 


HrtOb.L£NGTH=0UUDb 


iuC 


KAmK 


ertOu,LENoTrt=000*o 


IUC 


SCaH 


HKUG.L£NGrM=0Oi'*O 


IUC 


MfrtPK 


HrtuG,L£iXGiH=O00AO 


IUC 


MTrtHH 


P»<UG.Lt.'^GTH=OOy<iO 


IUC 


MTluaCPk 


PKUG.L£nGTH=OUUiu 


iUC 


Mi'Utrt 


HHOG.LtNGTH=OuO::D 


IOC 


PHCHK 


PrtOG.LtNGTH=0Ut/ib 


IUC 


CrtUtK 


PrtOG.L£.'<GTM=000'+i 


IUC 


CPUtH 


PHOG,u£NGTH=00ii J 


IUC 


HfwHrtK 


PKOG»l£in6Th=oOJJ-) 


IuC 


MfKHKK 


HKOG.L£NUTH=00<:i't 


IUC 


ilTLUCPrtH 


PHOG.L£NGrH=0Ul<ii 


iUC 


CMNrtT<>IS 


PKOG.LtiJGTrl=OO^i'y 


IUC 


WHaTISII 


PKOG.L£NGTri=00JJJ 


IUC 


NtiO 


PrtOG.LeiXGTM=U01<;<i 


iuC 


NKC 


PHOG.l.Ei^GTi1=001i£: 


IUC 


NMH 


PrtOG.LLHGTH=Oog^4 


IUC 


r.NorKuY 


PHOG,L£N6Tti=oyyj£: 


IUC 


lYPciOUT. 


PrtOG»LENGTH=oOi£u / 


iUC 


whAfKIWU 


PHOG.LErtGTHsouOJ? 


C«C« 


Oi'Ji.TtbSi 


.PrtOTECT 


c.c* 


UNlT»abi 


iCKKEC 


c.c. 


UiMlTt33i 


lOVPrtO 


IUC 


REStAKli 


Prt0G.Let^GTri=00I<;3 


IUC 


S^^tbTAHT 


PrtOG.Lt'^GTri=0iIJr 


IUC 


SUrtTlOHel 


PHOG,L£n6TH=04Juo 


iUC 


SOOiiP 


PrtUG.tti<GTH=OOiJS 


IUC 


BlNANUt^C 


PKOG«L£tNGTn=OOU til 
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r'H'je. 



liJC 

IDC 

C«C. 

C.C.. 

luc 

c.c. 
c.t. 
c.c. 
cc. 

iUC 
luc 
iuC 
luC 
C.C. 

c.c. 

C.C. 

c.c. 

luC 
luC 
IJC 
luC 
lUC 

iuc 

i^L 

iUC 

iUC 

luC 

liJC 

iuC 

i^C, 

IUC 

iuC 

c.c. 

IOC 
luC 

IUC 
IUC 
iuc 

J.UC 
iUC 

iuc 
iUC 
iUC 
iuC 

iuc 

iUC 
iuC 
iUC 

iuc 
IUC 
i.uc 
iuc 
I'uC 



SKlVHii**!' 

"shTljuml 

UNi l»sb 

suHitai r 

UNi f »5t) 
Ui'ji Ttst) 
uNi r»3b 
o,>iiT»t)b 
SUKiPOMY 

stir<rpui.y 

SOKflOHl 
SUKlHMbl 
UNlT»3b 
Ul'^i ( tJ'D 
Ol'iiTtDS 
UtJi V»33 

SKlMriAco 
SwTmPOlF 
Sk I i-IPULo 
ShiTKiiALo 
Srt IrtbALF 

SKfKPOUa 
SOt<l IuP2 
SKti>TArtf 
SwTtaOAL 
BALCFOkW 
halCBACn 
POlYFUKw 
POLYdACK 

UNIT* 33 

SiPP 

SAihT 

lOPACK 

luOWAlN 

SuAPSflUT 

CuSY 

CUSYHOwfT 

bb 
pKtUlB 

KAAH 

SCAK 

MTwPk 

MlKPH 

HlLUACPK 

MlOtK 

PkCPK 

CKUtK 

CPULK 

mTmPKh 

f^lXPHH 

mTluCPkk 



PKOU 

PHU6 

.CKHtC' 

»OvPku 

PriOb 

»c^Ktc 

fUVpMO 

♦CKHEC 

»OVPrtU 

PHOli 

HHUfcJ 

PKO^J 

HHUij 

tCKHtC 

» JVPHO 

fCKHtC 

tOVPhtU 

PHUii 

PKO^J 

PkUvj 

Pri0(3 

PKOS 

PKU6 

PKOii 

Ph(U(9 

PKOG 

HKOb 

PrtOG 

PrtUu 

PH06 

PHUti 

PKOG 

»pKUTt 

PKOe 

PHOii 

PKOe 

PKUvi 

PHOti 

PKU(i 

PrtOli 



.Lt.N(jTr1= 






.ULNIjTH=0/ / 113 



.LtN6TM= 
.LENGTHS 
,4.tNtJTM= 



.Uti^urns 

.Lt.^kji'H' 

,L£H<JTH: 
.LtNtifh: 

• LtNiiTrts 
.LtiMGrrt= 
,LtN(iTH= 
.LtNbTh= 
.LtNtiTh: 
.LtNijTri= 
,Lt.^GTH= 
.LtN(3TH= 
.L£N(iTH= 

cr 

• LEiiiGTh' 
•LENGTHS 
.LtiMGTri= 
•LENGTHS 
•LENGTHS 
•LENGTHS 
•LENGTHS 



PHUG^ 

PKOG 

PKOG^ 

PROG. 

PKOG, 

PriUG, 

PriOG, 

PrtOG. 

PHOG. 

PrtOG, 

PHOG. 

PHOG. 

PKOG, 



LENGTHS 
LENbTHS 

LENGTH' 
LENbTHS 

LENbTHS 

LENGTHS 
LENGTH' 
LENGTHS 
LENGTH' 
LENGTH' 
LENGTH' 
LENGTH' 
LENGTH' 



OOu/o 

UOiiOi 



u y 

uOuu f 

OOOvl f 

OOuu/ 
iiOOo.i 

OiiJ/ 
00k: •♦b 
\i'(Lii.tl 

VttlOi) 

06i67 
04oo3 

U0*»o3 

uitoo 

\i01JL 

Olbor 

oot)«;3 
OoyfO 

OOJto 
UUUiU 

OOUiu 

uuu<::o 

UUOio 

louuf i 

001X3 
OOJJb 
00c:i4 
'U0it:3 
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^'MtJt 



luc 


CM.mKTnS 


PKOe.LEMGTH=00/ifO 


JluC 


wMrtTlSI f 


PHUb.LtiMiiTrisOUJJi 


lUC 


HKO 


PKOe.Lt.N6TM=001<;2 


iuc 


Nr<C 


PHO(j.L£NeTH=00Ild 


LOC 


T-it^H 


I^HO(3.LtN6TH=OOOo<» 


iwC 


1 .iMuTKUY 


PHOCJ.i.t.NGTM=00OJ£: 


luC 


TYKtOUl, 


PHOii.LE«(iTH=00<i(J? 


iUC 


Mt^.hlK.iHO 


PrtUG,L£.N{3TH=00yj? 


luC 


PKELIb 


PKOG,L£NGlH=00yi;U 


OV 


!35»l»i) 


OVtKLrtT i 


iuC 


PLOvlNl" 


PKUG.LtNGrH=00bJ6 


uv 


bbt^»i> 


OVfcrtLAi tL 


luC 


OVl 


P«UG.LENbTH=02lJ<; 


Stb 


b!i»i.S 


SEGm£!«(I 1 


IUC 


^>f1Miie^ 


PHOG.LENtiTH=Ol*oi 


Stii 


3b»£»b 


SEGrtt.Mi 2 


IUC 


PHii\bt2 


PKOG,LENGTH=OO^o'^ 


uv 


bb ♦ 3 » ii 


OVtKLAY J 


IUC 


OtHL0C^ 


PKOG.Lti^^GlMsOOio/ 


OV 


b3»<nS 


OVtHLMY 4 


IUC 


PLUv^ 


PKOG.LENGrHs04l^;3 


T'iM Jiig 


bb 




iuC 


t^tJMAlrt 


PK0G.L£iXGrM=001bb 


uv 


b5»I»i 




IUC 


«bU V 1 


PHOG.LtlM(irH=030ib 


StG 


bb»l»s 




U'C 


«l3FiLt 


PKUG.L£NGTH=05036 


i.tH3 


bb»2»S 




iuc 


RbKtPOt<T 


PKOG.L£iNGTH=0bJ't4 


bCij 


bD»i,ii 




IUC 


KvJPKO 


PHUG.L£t>IGTM=0bOU7 


uv 


!3b»2.S 




luC 


KbCOMH 


Pr«UG.L£'>'bTH=03<;'*0 


btlj 


bStltii 




IUC 


HbPUNt 


PKOG.LENGTM=04 foi 


btb 


bb»2»6 




IUC 


t^tiPii^O 


PKOG.L£i'JGTH=Obbo<f 


Stb 


bb»i»i) 




IUC 


KGCur 


pKOG.L£NGTH=0lb('3 


IUC 


KSH 1 S 


PHOG.L£rtGTH=0U0O2 


C.C. 


"u-Ji r»bb) 


.PHUTECT 


IUC 


hJbACCtPT 


PrtO6.LENGrH=0Ui/i 


lUC 


^JljU 


PH0G.L£NbTH=12uby 


C.C. 


Oil r»bbi 


»pHor£cr 


C.C. 


Uixl 1 ♦bb»PKELOAD 


C.C. 


u.'Ji r»bb< 


iCKHEC 


C.C. 


UNlTtbb! 


»OVPHO 


C.C. 


Ui'JI J»3bl 


FprtOtECT 


IUC 


FUPBOAi) 


PHOG.LEnGTm=0I ibb 


IUC 


OPfcJOXij 


PKOG.L£IMGTH=OOUJ3 


IUC 


BCudOAi 


PKUG.LtiMGTrisoU^^ii 


IUC. 


uiiLirr 


PHOG,LENGTri=0b2Uto 


IUC 


ClOi 


PHOG.LtNGTHsoOOw i 


C.C. 


UNlTtbbi 


►pKOltCT 


Iu»C 


CUPYS 


PHO«.L£NGTH=00'K33 
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H«G£ io 



iOC VcHifr HKQo,LtHoTM=Oil^J 

iuC iDOHP HHUb.l.EN(JTH=00437 

iuC CUHYwS PrtOG.Lti.^ljTHsoiUJD 

CC. UiUT»33t|Jr<0ftCT 

C.C. KiLti 

tuf 
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4. 1. 3 PRELIB SOURCE FOR BDP 



pMyt 



C.C. SEuU£NCe»004 

C*C* JOO*«*t 

C.C. eyUIH»5b=HT»b=5b 

C.C, tOUlP.iOsMT 

C.C. PRtLld»tlO 

C.C. FILE 

C.C. HteLACt.COBOLtCOaOL 

lUC CObUL PKOlj.LeNGTH=0iiiUi 

C.C. HEFLACE.C(JriaLIE»C080l.DPJ 

lUC CUttOLit HHU(3.U£N(iTH=0b010 

luC COrfOLUA Hrt06.L£N(3TH=UbU3J 

lUC COdULPi PHOy.L£NeTH=ObOoD 

IwC COdOLU«i PHOij.LEHyTH=UJb'*J 

lUC COt*OLP<i HH0ii,L£NtiTM=u6Uo 

IDC CuiiULUPJ PH0G,L£i>H»TM=03i3o 

C.C. HEHLACe»rt£SrART»aHTBUXS 

luC HESfAHT Pr<0G.L£N(jTM=03J0g 

lUC EKHSTOP PKOb.L£r«>TH=0OUci^ 

luC OPE''*I'^Pr rHOii.i.E'»GTH={>Ovi>o 

IOC OP£^fO^PT PHOG.L£HeTri=00006 

IL>C RtAU PHOG.L£Narri=00uu'» 

lUC WHITE PKOG.L£NeTH=00OJ4 

I.OC WtAUl HriyG.LEiVGTrtsyOOM'* 

iUC WrtlfEF PHOG»L£i'JSTH=000U4 

lUC EXAMINE PrtOG.L£NGTri=00iil 

iUC SUaSCHiP PWOG.Lt«'^GTfl=00iUb 

iUC DPSlNdCU PROG.U£nGTH=00XO*j 

IDC DPdCDblN PROG.LENGTM=00i^0 

IUC ACCEPT PR0G.LEi>*GTH=uai<;6 

IUC GPI^^MAST PRaG,LENGTH=0i<'y7 

IUC CLOSE PROa.L£i'^GTH=OUi^0 

IL»C STACKING PROG.L£NQTH=00?03 

IUC RERUN PR(3G.L£NGTH=00«ia 

IUC MaRULAdS PROG,LEWGTH=00 l32 

IUC LAdLAREA PROG.L£NGTM=yOu<i4 

iUC MawidSfL PROG.L£NGTM=000/3 

IUC MBRUdNSL PROG.L£NGTM=000<:3 

IUC WRTtiNSL PROe.LtNGrH=001<il 

IUC MdVARRtC PRQG,L£NGTM=0UuoiJ 

I'UC MdRMSRCH PROG,L£NGTH=U0Uii4 

IUC MdSAPRUC PRQG.L£NeTi1=«yui2 

IUC MdHFPROC PROG.LEi'JGTH=000ti; 

luC MdMFIiM PROG.lENGTH=U0W*2 

IOC Mbi-lFOUr PROG.L£N6TH=uOai6 

IUC J\/C0!<12 PROG.LENGTH=00Oi2 

loC JViMOALT PROG.LtNGrH=tl01iy 

iuC MdOPTflL PROG.L£N6TH=00U<:b 

IUC FIGCON PROG.L£N6TH=000<f4 

IUC COMPARE PROG.L£NGTM=00iU0 

IUC MULllPLY PROG.LENGTH=001'K> 

IUC OIVIOE PROG.LEN6Tri=0OHl 



60237000 



pMli£ 



iuQ iJttUIT t'HO^j.Lei'iGTrisUOi^a 

lUC AuPHMdtr ►'HOy.Lt'^brHsoOOJl 

IL»G UISHLAY >'HO^,L£mTn=00ddZ 

LUC !*ivFltjCUrt f?rtOO,Lt:i^'jrH=ouoc:3 

iuc vhH'x ^'HUb.Lt'^^3Tri=oouJl 

IUC VwHMN Pr(0(3.LENwrM=UUi«;i 

CC. KcHUACE^SOHTtSOrtT 

lUC SUKl HKUti.LtNUTH=OUDXD 

c.c. utLert.,owidUAS»oPrdoxs 

CC FiLh 
tui- 
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4.2 BINARY RELEASE TAPE FILE 1 

INTERIM LIBRARY PRELEB SOURCE 



C«C» :-)t.\jiU£iJCL»i)i)l 

C.C. .,JO0» » » ♦ » i-l rc-<lM LiriK«Ht oli-.C^A ( lOiJ. 

C.C. t--luiH,bj='lr, J3S3D 

C«C« f'KtLi'J* » i ♦ > 

C-C. r iLt 

iJC t^LJVliMt fJkut>.L£i>i6Tn = Uu-+-' / 

.)« so id 

■-.to ;3b*i 
or. LI b3»/i 

ii.'C i.)ciil.v,»C^ HKdij.Lc.i1'jrrl = UUl J /" 

i .'C ■-'l.JV<:f ^'r<Utj,L£'^«iTHs^<£J£ib 

C. v.. r iLt 
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4.3 RTS COSY TAPE CONTENTS 

The composite COSY tapes of this release contain all necessary routines used in generating either 
an RTS/STD or an RTS/BATCH library. The following list gives the sequence of the routines found 
on the RTS COSY tapes. 

The deck name of each routine in the following list is suffixed with a special code. The definitions 
of this code are: 

S Specified routine used for RTS/STD libraries 

B Specified routine used for RTS/BATCH libraries 

Specified routine used for both RTS/STD and RTS/BATCH with assembly option. 

A Specified routine used for all libraries 

X BDP users 

Y BCD users 

Z Specified routine has a special assembly option 

COSY TAPE NUMBER 1 



DECK NAME 


CODE 


DECK NAME 


CODE 


DECK NAME 


CODE 


DECK NAME 


CODE 


ZERO 


A 


POSTLOAD 


AZ 


BINARY 


A 


EXTREMAl 


A 


CIO 


SZ 


PRE LIB 


A 


BUFFER 


A 


EXTREMA2 


A 


BCIO 


BZ 


PLOVINT 


A 


UNIT 


A 


FLOAT F 


A 


DRIVLABT 


A 


OVl 


A 


lOCHK 


A 


FIXF 


A 


DRIV3649 


A 


PHASE 1 


A 


EOFCHK 


A 


MASKINGF 


A 


DRIV3248 


A 


PHASE2 


A 


TAPEHAND 


A 


FAULTS 


A 


DRIV3659 


A 


DEBLOCK[ 


A 


PAUSE 


A 


SENS LITE 


A 


DRV512 


A 


PLOV2 


A 


CONTROL 


A 


SENSWTCH 


A 


DRIV3644 


A 


EXECOVR 


A 


DOUBLE 


A 


Q8QERR0R 


A 


DRIVTYWR 


A 


FTO 


A 


DFPRIME 


A 


SCOPUTIL 


A 


DRIV3245 


A 


PROGNAME 


A 


DFP 


A 


COPYS 


A 


DRIVER12 


A 


FTl 


A 


QIQADRI 


A 


COPYT 


A 


OCRMACROt 


A 


FT2 


A 


ITOJ 


A 


VERIFY 


A 


DRIV3293 


A 


FTS 


A 


ITOX 


A 


DUMP 


A 


DRIV3691 


A 


FT4 


A 


XTOI 


A 


COPYWS 


A 


SCICRECl 


SZ 


FTS 


A 


POWRF 


A 


COPYTSQ 


A 


BCICRECl 


BZ 


FT6 


A 


SINCOS 


A 


ERROR 


A 


RDUMP 


AZ 


FTE 


A 


ATANF 


A 


lOPACK 


A 


PRELOAD 


OZ 


FTN 


A 


EXPF 


A 


lODRAIN 


A 


CKRECl 


A 


FLOVER 


A 


LOGF 


A 


SNAPSHOT 


A 


LOADER 


AZ 


BCDINP 


A 


SIGNF 


A 


FDPBOXS 


A 


OVPRO 


AZ 


BCDOUT 


A 


SQRTF 


A 


OPTBOXS 


A 


PROTECT 


A 


FORMAT 


A 


ABSF 


A 


BCDBOXS 


A 


t Exists as a 


MACRO 


only 
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COSY TAPE NUMBER 1 (continued) 



DECK NAME 


CODE 


DECK NAME 


CODE 


DECK NAME 


CODE 


DECK NAME 


CODE 


BSIPP 


S 


SAINT 


AZ 


COBOL 


Y 


MBRMSRCH 


Y 


SIPP 


A 


SORT 


AZ 


COBOLIE 


Y 


MBSAPROC 


Y 


KAAR 


AZ 


BINANDEC 


A 


COBOLDl 


Y 


MBMFPROC 


Y 


SCAR 


AZ 


SDUMP 


A 


COBOLPl 


Y 


MBMFIN 


Y 


MTWPR 


A 


SRTPRINT 


A 


COBOLD2 


Y 


MBMFOUT 


Y 


MTRPR 


A 


SORTPOLY 


A 


COBOLP2 


Y 


JVC0M2 


Y 


MTLDACPR 


A 


SRTMBALF 


A 


COBOLDP3 


Y 


JVNOALT 


Y 


MTDER 


A 


SRTMBALB 


A 


ERRSTOP 


Y 


MBOPTFIL 


Y 


PRCPR 


A 


SRTMPOLF 


A 


OPENINPT 


Y 


TRANSMIT 


Y 


CRDER 


A 


SRTMPOLB 


A 


OPENOTPT 


Y 


FIGCON 


Y 


CPDER 


A 


SORTPDMY 


A 


READ 


Y 


COMPARE 


Y 


MTWPRR 


AZ 


SORTEDIT 


A 


WRITE 


Y 


EDIT 


Y 


MTRPRR 


AZ 


SORTIOPl 


A 


READI 


Y 


EDITCOBL 


Y 


MTLDCPRR 


AZ 


SORTPHSl 


A 


WRITE F 


Y 


MULTIPLY 


Y 


CMNRTNS 


A 


SRTRBALF 


A 


EXAMINE 


Y 


DIVIDE 


Y 


WHATISIT 


AZ 


SRTRPOLF 


A 


SUBSCRP 


Y 


BMULTPLY 


Y 


NRC 


AZ 


SRTRBALB 


A 


ACCEPT 


Y 


BDIVIDE 


Y 


NRC 


AZ 


SRTRPOLB 


A 


DISPLAY 


Y 


DPMULDIV 


Y 


NWR 


A 


SRESTART 


A 


CONVERT 


Y 


STRIPPER 


Y 


T.NOTRDY 


A 


RESTARTl 


A 


GPIOMAST 


Y 


BSTRIPPR 


Y 


TYPEOUT. 


A 


RSTRTDUM 


A 


CLOSE 


Y 


DEEDIT 


Y 


WHATKIND 


A 


SORTIOP2 


A 


STACKING 


Y 


NUMERIC 


Y 


COMPASSB 


A 


SRTEQUAL 


A 


RERUN 


Y 


ALPHABET 


Y 


COMPASS 


A 


POLYFORW 


A 


MBRDLABS 


Y 


MVFIGCON 


Y 


OVERLAYl 


A 


BALCFORW 


A 


LABLAREA 


Y 


VARCl 


Y 


PASSONE 


A 


BALCBACK 


A 


MBWTBSTL 


Y 


VARN 


Y 


PASSTWO 


A 


POLYBACK 


A 


MBRDBNSL 


Y 


VARAN 


Y 


SYMTBLE 


A 


WAITBEEP 


A 


WRTBNSL 


Y 


ROUNDER 


Y 


CRT 


A 


RESTART 


Y 


MBVARREC 


Y 


ZIPPER 


Y 



COSY TAPE NUMBER 2 



DECK NAME 


CODE 


DECK NAME 


CODE 


DECK NAME 


CODE 


DECK NAME 


CODE 


COMACt 


A 


POPENOTP 


X 


PC LOSE 


X 


PMBMFPRO 


X 


PRESTART 


X 


PREAD 


X 


PSTACKIN 


X 


PMBMFIN 


X 


PCOBOL 


X 


PWRITE 


X 


PRERUN 


X 


PMBMFOUT 


X 


PCOBOLIE 


X 


PREADI 


X 


PMBRDLAB 


X 


PJVCOM2 


X 


PCOBOLDl 


X 


PWRITEF 


X 


PLABLARE 


X 


PJVNOALT 


X 


PCOBOLPl 


X 


PEXAMINE 


X 


PMBWTBST 


X 


PMBOPTFI 


X 


PCOBOLD2 


X 


PSUBSCRI 


X 


PMBRDBNS 


X 


PFIGCON 


X 


PCOBOLP2 


X 


PBPBINBC 


X 


PWRTBNSL 


X 


PCOMPARE 


X 


PCOBOLDP 


X 


PDPBDCBI 


X 


PMBVARRE 


X 


PMULTIPL 


X 


PERRSTOP 


X 


PACCEPT 


X 


PMBRMSRC 


X 


PDIVIDE 


X 


POPENINP 


X 


PGPIOMAS 


X 


PMBSAPRO 


X 


PSTRIPPE 


X 


■f Exists as a 


MACRO only 
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COSY TAPE NUMBER 2 (continued) 



DECK NAME 


CODE 


DECK NAME 


CODE 


DECK NAME 


CODE 


DECK NAME 


CODE 


PDEEDIT 


X 


PVARN 


X 


RGOVl 


Y 


RGPTWO 


Y 


PNUMERIC 


X 


PVARAN 


X 


RGFILE 


Y 


RGCRT 


Y 


PALPHABE 


X 


PZIPPER 


Y 


RGREPORT 


Y 


RGRTS 


Y 


PDISPLAY 


X 


CCSYRDWT 


A 


RGPRO 


Y 


RGACCEPT 


Y 


PMVFIGCO 


X 


COSY2. 


A 


RGCOMP 


Y 


RGU 


Y 


PVARCl 


X 


RGMAIN 


Y 


RGPONE 


Y 







4.4 ASSEMBLY REFERENCE GUIDE 

4.4. 1 REFERENCE GUIDE FOR ASSEMBUNG INSTALLATION DEPENDENT ROUTINES 
CIO 



COSY NO. 


1 


10 


20 


40 


3 


TIMEOUT 


EQU 








BCIO 



COSY NO. 



SCICRECl 



10 



20 



TIMEOUT 



EQU 



40 



COSY NO. 


1 


10 


20 


40 


4 


ACCT 


EQU 







5 


BDP 


EQU 







6 


CLOCK 


EQU 







7 


NCHANS 


EQU 


6 




8 


MAXCORE 


EQU 


777378 




2033,2061 


AET 


OCT 






2126,2132 


RHT 


modifications 






2140, 2143 


BRHT 


modifications 






2210 




00 


lOIP 





2211 




00 


lOIP 


1 


2212 




00 


lOIP 


2 


2213 




00 


lOIP 


3 


2214 




00 


ABINRT 


4 


2215 




00 


ABINRT 


5 


2216 




00 


ABINRT 


6 


2217 




00 


ABINRT 


7 


2253 


SYST. lOM 


OCT 


178 
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BCICRECl 



COSY NO. 



703 



704 



ACCT 

BDP 

CLOCK 

NCHANS 



_10 

EQU 
EQU 
EQU 
EQU 



MAXCORE EQU 



lOT 



00 



00 



20 



376378 



lOIP 



lOIP 



40 



705 



706 



707 



708 



709 



710 



1306.1326 



1391.1397 



1438 



00 



00 



00 



00 



00 



00 



AET 



OCT 



lOIP 



lOIP 



ABINRT 



ABINRT 



ABINRT 



ABINRT 



RHT 



modifications 



SYST, lOM 



OCT 



178 



kuump 



COSY NO. 



21 



10 



SER. OPT 



EQU 



20 



40 



PRELOAD 



COSY NO. 



131 



130 



181 



182 



183 



BF 



ACCT 



TRAIN 



10 



EQU 



EQU 



EQU 



TRN5951 



EQU 



TRN5952 



EQU 



TRN5953 



EQU 



20 



40 



LOADER 



COSY NO. 



10 



10 



LERP 



EQU 



20 



40 



POSTLOAD 



COSY NO. 



10 



20 



40 



23 



LERP 



EQU 
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OVPRO 



COSY NO. 



10 



20 



40 



12 



LERP 



EQU 



4.4.2 COSY CORRECTION SAMPLES 



The coding and control cards necessary to punch binary decks for insertion into the PRELIB source 
are demonstrated by the following example. It does not represent a complete update. This example 
assumes the following system. 

1. Floating-point hardware 

2. No BDP hardware 

3. User desires a STD RTS library 

4. User desires clock interrupt processor 

5. User desires basic accoimting 

6. User desires lost interrupt option 

7. A 32K 3300 with the following configuration: 



Equipment 
Type 


Quantity 


Controller 


Channel 


Equipment 


Unit 


Console typewriter 


1 


none 


none 


none 


none 


607 magnetic tape drives 


4 


3423 


2,3 


4 


0-3 


415 card punch 


1 


3446 


1 


4 





501 printer 


1 


3659 


0,1 


5 





405 card reader 


1 




1 


3 






gSEQUENCE, 002, MODIFY SCICRECl 
9JOB, 12345, ABC 
9EQUIP, 01=MT, 02=MT 



9COSY 








DELETE/ 


4 


ACCT 


EQU 


1 




DELETE/ 


5 


BDP 


EQU 






LUN 01 = The RTS COSY tape 
LUN 02 = The Hollerith ouiput tape 

Basic accounting desired 
BDP hardware not available 
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DELETE/ 


6 




CLOCK EQU 


1 


Clock interrupt proc 


DELETE/ 


7 




NCHANS EQU 


4 


Define the CST 


DELETE/ 


8 




MAXCORE EQU 


777378 


Set the amount of av£ 


DELETE/ 


2033, 2061 




AET OCT 


41004000 


Unit 1 library 


EXT 


DRIVEROl 


Ch-2/3,Eq-4,Un-0 


VFD 


09/000, AlS/DRIVEROl 




OCT 


45000000 


Unit 2 CTO/CFO 


EXT 


DRIVER05 


Console typewriter 


VFD 


09/000, A15/DRIVER05 




OCT 


42003000 


Unit 3 standard INP 


EXT 


DRIVER02 


Ch-l,Eq-3,Un-0 


VFD 


09/100, A15/DRIVER02 




OCT 


43005000 


Unit 4 standard OUT 


EXT 


DRIVER03 


Ch-0/l,Eq-5,Un-0 


VFD 


09/300, A15/DRrVER03 




OCT 


44004000 


Unit 5 standard PUN 


EXT 


DEIVER04 


Ch-l,Eq-4,Un-0 


VFD 


09/100, A15/DRIVER04 




OCT 


01004001 


Magnetic tape 


VFD 


09/060, A15/DRrVER01 


Ch-2/3,Eq-4,Un-l 


OCT 


01004002 


Magnetic tape 


VFD 


09/060, A15/DRIVER01 


Ch-2/3,Eq-4,Un-2 


OCT 


01004003 


Magnetic tape 


VFD 


09/060, A15/DRIVER01 


Ch-2/3,Eq-4,Un-3 



RHT 



BRHT 



DELETE/ 


2126,2132 


OCT 


0,0,0,0 


OCT 


0,0,0,0 


OCT 


0,0,0,0 


OCT 


0,0,0202,03040502 


DELETE/ 


2140,2143 


OCT 


0,0,0,0 


OCT 


0, 0, 0, 


OCT 


0, 0, 0, 


OCT 


0,0,0202,0 





DELETE/ 


2210,2217 




00 


lOIP 




00 


lOIP 




00 


lOIP 




00 


lOIP 




00 


ABINRT 




00 


ABINRT 




00 


ABINRT 




00 


ABINRT 




DELETE/ 


2253 


SYST.IOM 


OCT 


17 


SCICRECl 


DECK/ 

ENDCOSY/ 


1=01, H=02 


9COMPASS, 1= 


=02, L, R, P 




77 

8 8 end -of -file 







Set up RHT to match AET 



Set up BRHT to match AET 



CIT modification 
lOIP channel available 
ABINRT channel not available 



Channel 0, 
Channel 1, 
Channel 2, 
Channel 3, 
Channel 4, 
Chaimel 5, 
Channel 6, 
Channel 7, 



available 
available 
available 
available 
not available 
not available 
not available 
not available 



Set up system I/O mask to match 
available channels 
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This example assumes the following: 

1. A BATCH RTS user 

2. User does not desire clock interrupt processor 

3. User does not desire basic accounting 

4. User does not desire lost internipt option 

5. No BDP hardware 

6. A 16K 3100 with the following configuration: 



Equipment 












Type 


Quantity 


Controller 


Channel 


Equipment 


Unit 


Console typewriter 


1 


none 


none 


none 


none 


601 magnetic tapes 


4 


3127 








0-3 


405 card reader 


1 


3248 


1 


3 





501 printer 


1 


3152 


1 


5 





415 card punch 


1 


3446 


1 


4 






^SEQUENCE, 002, MODIFY BCICRECl 
9JOB, 12345, ABC 
^EQUIP, 01=MT, 02=MT 
ICOSY 





DELETE/ 


4 


ACCT 


EQU 







DELETE/ 


5 


BDP 


EQU 







DELETE/ 


6 


CLOCK 


EQU 







DELETE/ 


7 


NCHANS 


EQU 


2 




DELETE/ 


8 


MAXCORE 


EQU 


376378 



Do not include basic accoimting option 



BDP hardware not available 



Do not include the clock option 



Define the CST and EST length 



Set the amount of available memory 
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lOT 



AET 



DET.KTE/ 


703,710 




00 


lOIP 


Channel 0, available 


00 


lOIP 


Channel 1, available 


00 


ABINRT 


Channel 2, not available 


00 


ABINRT 


Channel 3, not available 


00 


ABINRT 


Channel 4, not available 


00 


ABINRT 


Channel 5, not available 


00 


ABINRT 


Channel 6, not available 


00 


ABINRT 


Channel 7, not available 
Define the AET 


DELETE/ 


1306,1326 




OCT 


41000000 


Unit 1 library 


EXT 


DRIVEROl 


Ch-0,Eq-0,Un-0 


VFD 


09/200, A15/DRIVER01 




OCT 


45000000 


Unit 2 CTO/CFO 


EXT 


DRTVEROS 


Console typewriter 


VFD 


09/000, A15/DRIVER05 




OCT 


42003000 


Unit 3 standard INP 


EXT 


DRIVER02 


Chl,Eq3,UnO 


VFD 


09/100, A15/DRrVER02 




OCT 


43005000 


Unit 4 standard OUT 


EXT 


DRIVER03 


Chl,Eq5,UnO 


VFD 


09/100, A15/DRIVER03 




OCT 


44004000 


Unit 5 standard PUN 


EXT 


DRIVE R04 




VFD 


09/100, A15/DRIVER04 




OCT 


01000003 


Magnetic tape 


VFD 


09/060, A15/DRIVER01 




OCT 


01000002 


Magnetic t^pe 


VFD 


09/200, A15/DRIVER01 




OCT 


01000001 


Magnetic tape 


VFD 


09/200, A15/DRIVER01 
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DELETE/ 


1391,1397 


EHT 


OCT 


0,0,0,0 




OCT 


0,0,0,0 




OCT 


0,0,0.0 




OCT 


0,0,0202,03040501 




DELETE/ 


1438 


SYST. lOM 


OCT 


3 



Set up RHT to match AET 



BCICRECl DECK/ 



Set up system I/O mask to match 
available channels 



1=01, H=02 



ENDCOSY/ 
gCOMPASS, 1=02, L, R, P 
||end-of-file 



4.5 ONE CARD LOADER 

M order to run the one-card loader program as listed in paragraph 4. 5. 1, the appropriate 
SEQUENCE, JOB, and COMPASS control cards must be inserted before the deck and the 
appropriate LOAD, RUN, and end-of-flle cards must be placed after the deck. 

To terminate punching the one-card loader cards when executing the program, set SELECT 
JUMP 1 on. 
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4. 5. 1 ONE- CARD LOADER LISTING 











L0A0512 


















EXT 


CIO 














EKTRY 


LOAC'512 


00000 


C1077777 


01 





77777 


L0ft0512 


Ujo 


♦• 


Qcoai 


00777777 


00 


1 


X77777 


3 


PTJ 


CIO 


0CG02 


02000076 


02 


c 


00076 





G2 


6 2 


00003 


01000^01 


01 





F00331 





UP 


♦-2 


Qonoi* 


i+lCOOOl? 


ki 





P00013 





ki 


ARS 


0G0d5 


0COOC350 


CO 





00050 







ABSE-ABS 


00006 


00700001 


3 


1 


XOOOCl 


3 


^TJ 


CIO 


oono7 


13C0C076 


17 





00076 





13 


62 


00010 


03200006 


03 





P00006 


2 


flZJtGF 


•-2 


00011 


COIOOOOQ 


00 





POOOOO 


1 


Svl 


L0AC512 


00012 


ClOCOOOl 


01 





POOOOl 





UJP 


L0AC512+1 


00013 


IttOSOlOO 


1«» 





50000 


ABS 


NOP 


50000B 


oonii* 


li»1000CC 


Ik 





OOOOQ 


1 


EM 


0,1 


00015 


20100007 


20 





00007 


1 


LCfi 


7,1 


ooni6 


•♦0120000 


1+0 





20000 


1 


STfl 


XCT,1 


00017 


101003«*Q 


10 





OOOttG 


1 


ISI 


XCTN0,1 


00C20 


01000002 


?1 





3000? 





LwP 


2 


000?1 


01020000 


01 





2000Q 





CJP 


XQT 


00022 


77032000 


77 


Q 


3200n 





CON 


£UUU,C 


00023 


01C?30Ca 


CI 





20000 





LJP 


XQT 


OCO?'* 


7'tC2Q120 


7t» 





20120 





IKPVt 


C,3FFR,BFFRE 


00025 


3C020Q50 


30 





20050 









00026 


01020000 


01 





2000G 





LJP 


XQT 


00127 


77230002 


77 





30002 


2 


FX«: 


2,C 


00330 


01020005 


01 





20005 





L«P 


XCT5 


00031 


lifeoonoo 


lU 


1 


00000 


2 


EKA 


C 


00]32 


21020053 


21 





20050 





LC'J 


nFFo 


0Cf]?3 


13000006 


13 





00006 





SHAC 


6 


000?'+ 


154*77776 


15 


1 


77776 





INA.S 


-1 


00035 


53500000 


53 


1 


30000 


1 


Tfll 


1 


QOO'6 


15'.77737 


15 


1 


77737 





I^a,s 


_=.IF 


0Pn37 


C322QC36 


03 





20036 


2 


A?J,GE 


XQT30 


QCC<*0 


l30G0nn3 


13 





0OOC3 





SHAC 


7 


00041 


12<*J0003 


12 


1 


00003 





SHQ 


3 


ODOL? 


i3oron<« 


13 





OOOltf 





S(-AQ 


12 


00Q't3 


tfit02003f» 


1*1* 





2003*. 





SkA 


XQT2fl 


OCC^U 


?tU20351 


?.k 


n 


20051 





LCA 


P.Ff^i 


000t5 


3002CC50 


30 





20050 





ACA 


RFFP 


000(»6 


lUJOOT*? 


It* 





000'*5 


2 


ENI 


37,2 


00':'*7 


3022005? 


30 





20052 


2 


ACA 


nPFP2,2 


00050 


02520T25 


C2 


1 


20025 


2 


Ijn 


XCT21,2 


0CQ51 


C3G2003"' 


03 





20033 





ftZJ,EC 


XCT27 


00052 


77230010 


77 





30010 


2 


PXS 


106, C 


00053 


00700003 


DO 


1 


COOOO 


3 


■'TJ 


8 


0005't 


77770300 


77 


1 


70000 


3 


LC*:; 




00055 


20120060 


2G 





20060 


1 


LOA 


FPGRH,l 


00056 


COIOOOOO 


(♦0 





00 003 


1 


SIA 


0,1 


00C57 


C2520''33 


?2 


1 


20033 


1 


140 


X0T27,1 


060 


772703'tO 


77 





?00'»3 


2 


EX-^ 


«.OT,r 


00061 


C1020031 


Ql 





20031 





L^f 


XCT25 


00C62 


C1C203C2 


CI 




t 


20002 
1QDQ3 


3 
C 


EOU 


XQT2 

7 
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02000 


EUUU 


EQU 


2Q00B 


20000 


XQT 


ECU 


20000B 


2000? 


XQT2 


ECU 


XQT+2 


20005 


XQT5 


ECU 


XQT + 5 


20025 


XGT21 


ECU 


XGT+21 


20031 


XQT25 


ECU 


XGT+25 


20032 


XQT2r 


ECU 


XCT+27 


2003'« 


XQT28 


ECU 


XCT+28 


2C035 


XCT3C 


ECU 


XQT+3G 


OOO'tQ 


XQTNO 


ECU 


32 


20050 


BFFP 


ECU 


XCT + ^iO 


20051 


BFFPi 


ECU 


BFFP+1 


20052 


BFF02 


ECU 


BFFO+2 


20060 


POGPH 


ECU 


BFFR+8 


20120 


BFFi^E 


EQU 


BFFR + 1»0 


0001*0 


RIF 


ECU 


itOB 


0C063 


AESE 


ECU 


*■ 






EMD 


L0A0512 



4.5.2 SAMPLE ONE- CARD LOADER 
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4.6 FCO LEVEL 

RTS Version 2. is assumed to run on a configuration at the following field change order 
levels: 



3100 Equipment 



3114 


Main frame 


3119 


Memory 


3207 


Channel 


3106 


Channel 


3248 


Card reader controller 


3256 


Printer controller 


3228 


Tape controller 


3446 


Card punch controller 


3447 


Card reader controller 


3200 Equipment 




3204 


Main frame 


3209 


Memory 


3206 


Channel 


3207 


Channel 


3228 


Tape controller 


3248 


Card reader controller 


3245 


Card punch controller 


3659 


Printer controller 


3300 Equipment 





3304 

3302 

3310 

3312 

3306/06 

3307/06 

3649 

3644 

3659 

3421 



Main frame 

Memory 

Floating point 

BDP Unit 

Channel 

Channel 

Card reader controller 

Card punch controller 

Printer controller 

Tape controller 



Product Designation 

COS 
BOl 
A04 
B06 
A12 
B02 
A08 
A08 
B03 



Product Designation 

AOl 
A08 
A07 
AOl 
A08 
A12 
A05 
All 



Product Designation 

A22 
A14 
A09 
A15 
A08 
A12 
A23 
A14 
A13 
A08 
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4.7 VERIFICATION DECK OUTPUT 

The following paragraphs contain verification program outputs for the RTS product set members. 
BSIPP, SIPP, and error recovery routines do not have verification programs. 



4.7.1 ADAPT 



000 



PARTNO TEST TLRST.TLLFT AND TLON 

SS THIS PROSRAM SMOUlO HANG UP ON CARD I40 WITH ERROR NO, 503 

LOOPST 

CLPRNT "'' 

Ll«UINE/O»0tS.0 S$ X-AXlS 003 

La»LINE/9fOt9t5 SS LINE AT X«9 00* 

L3»LINe/0t8.5.8 SS LINE AT X»8 005 

L4»LtNE/0.0«0«5 SS Y-AXIS JJ* 

STRAT«POINT/-l»-lfO "' 
PP«PLANE/0»0.1»»tS 

PSIS/PP .,. 

CUTTER/.S 008 

HACHIN/ BENOIX, 1 002 

FROM/STRAT OlA 

SO/Ll 010 

TLH6T.eOHGT/l.l 020 

eOLFT/L2tU3 "0 

.-• >. yi ■> 040 

80LFT/L4.LI 050 

TLLFT.80LFT/Ll«PASTiL2 060 

OOUFT/LZ 0^0 

90LFT/L3,PAST.L* 080 

LOOPND 

l-OOPST ... 

GOLFT/L* 090 

TLR6T.00LFT/L1 ;?0 

TLLFT.00LFT/L2 "0 

TLR3T.G0LFT/I.3 120 

TLONiGOLFT/U*tPAST.Ll 130 

OOLFT/Ul }*0 

00LFT/L2tPASTtL3 ^'0 

G0LFT/L3. 1*0 

G0LFT/L4iLl ^''0 

9OT0/STRAT *00 

LOOPND 

^"^ FINI "NI 



60237000 11-4-37 



TEST TLMTiTLUFT AND TLON 




CARD NO. 


000 TAPE NO. 


2 


CUTTER/ .5000 






CARD NO. 


008 TAPE NO. 


5 


MACHIN/BENOIX 1 






CARD NO. 


002 TAPE NO. 


7 


-1,0000000 


Y 
-1.0000000 


7 




CARD NO. 


OlA TAPE NO. 


4 


X 
•1.0000000 


Y 
-0.2500000 


z 

•0.5000000 


CARD NO. 


010 TAPE NO. 


11 


X 
9.2500000 


Y 
•0,2500000 


z 

-0.5000000 


CARD NO. 


020 TAPE NO. 


13 


X 
9.2500000 


Y 
7.7500000 


z 

-0.5000000 


CARD NO. 


030 TAPE NO. 


15 


X 
•0.2500000 


Y 
7.7500000 


z 

-0.5000000 


CARD NO. 


0*0 TAPE NO. 


17 


X 
-0,2500000 


Y 
.2500000 


z 

•0.5000000 


CARD NO. 


050 TAPE NO. 


19 


X 
9.2500000 


Y 
.2500000 


z 

.0,5000000 


CARD NO. 


060 TAPE NO. 


21 


X 
9.2SAOOO0 


Y 
7,7500000 


z 

•0.5000000 


CARD NO, 


070 TAPE NO. 


23 


X 
-0.2500000 


Y 
7,7500000 


z 

•0,5000000 


CARD NO, 


080 TAPE NO. 


25 


X 
•0.2500000 


Y 
.0.2500000 


z 

.0,5000000 


CARD NO, 


090 TAPE NO. 


27 


X 
8.TSO00OO 


Y 
•0,2500000 


z 

-0,5000000 


CARD NO, 


100 TAPE NO, 


29 


X 
S. 7500000 


Y 
8,2500000 


z 

•0.5000000 


CARD NO, 


110 TAPE NO. 


31 


X 




Y 
8,2500000 


Z 
-0.5000000 


CARD NO. 


120 TAPE NO. 


33 


X 




Y 
•0.2500000 


Z 
•0.5000000 


CARD NO. 


130 TAPE NO. 


35 


••••• SECTION II ERROR 503 ON CARD NUMBER 


1*0 1 CALL CARD 


NUMBEROOOOOOOO 






riNi 






CARD NO. 


lAO TAPE NO. 


38 



CHECK CLTaPE PRINTOUT FOR PROGRAM ERROR COMMENTS 
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PARTNO ARLM8 TEST 7/30/66 
LOOPST SS FOR BLOCKINQ 
CLPRNT 

CUTTER/1 

CUCIRCLE/a>0,10 
Ll»LINE/0»-B|li-8 
L2>LINE/0i0ili0 

PROMZ-lO.StatO 
INOIRV/ltOtO 
TLONteOFHO/L^tONtCl 
80F-W0/L2.P*ST,C1 
O0FWB/L2»T0«CJ 
OOFWD/L2tONtCl 
80F«D/L2«PAST.cI 
FROH/.7,-T.S0.0 

INDIRV/ltOtO 
TLLFT.SOFWO/UltTO.Cl 
OOFND/LltONfCl 
eOFWD/LliPAST>Cl 
LOOPND SSFOR BLOCKING 
F I N I 



0. e> HORNINS 



001 

002 
005 
010 
020 
030 
0*0 
050 
060 
070 
OSO 
090 

loo 

120 
130 
Uo 
ISO 

1«0 



ARLMO TEST T/30/66 


D. a. 


HORNINe 






CUTTER/ 1,0000 










X 
•10.5000000 


V 





Z 





X 
•10.000A500 


Y 





Z 





X 
»9.4999500 


Y 





Z 





X 
9.4999500 


Y 





Z 





X 
9.9O99500 


Y 





Z 





X 
10.5004500 


Y 





z 





X 
•7.0000000 


Y 
■7.5000000 


z 





X 
5.8308726 


Y 
.7.5000000 


z 





X 
6.61*3171 


Y 
•7.5000000 


z 





X 
7.3491123 


Y 
.7.5000000 


z 






FINI 



CARD NO. 


001 TAPE NO. 


2 


CARD NO. 


005 TAPE NO, 


4 


CARD NO. 


040 TAPE NO, 


6 


CARD NO. 


060 TAPE NO, 


9 


CARD NO. 


070 TAPE NO. 


11 


CARD NO. 


OSO TAPE NO. 


13 


CARD NO. 


090 TAPE NO. 


is 


CARD NO. 


100 TAPE NO. 


17 


CARD NO. 


TAPE NO. 


19 


CARD NO. 


130 TAPE NO. 


22 


CARD NO, 


140 TAPE NO. 


24 


CARD NO. 


150 TAPE NO. 


26 


CARD NO. 


160 TAPE NO. 


28 
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4. 7. 2 COBOL (BCD AND BDP) 

COBOL HAS BEEN INSTftLLEP ON THIS LIBRftRY 

4.7.3 COMPASS 

COMPASS HAS BEEN INSTALLED ON THIS LIBRARY, 

4.7.4 COSY 

CHKCOSY DECK/ C"06 
ENDCOSY/ 

4.7.5 FORTRAN 

FORTRAN HAS BEEN INSTALLED ON THIS LIBRARY, 
I FTNO OOftO STOP 
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4,7.6 PERT COST 



M«STF' 


Tnff: Lt?5TT' 


- ri-ST Trsr 


^^:■,1 3200 cEpr/i 


PHC"5Ba 


..I ilF 


:<;IKMaT7': 


M - C4e 




FILE n 


K|f . 


■ S'l^'twapv 


^■|i^^la^;"" FiLF 




SUMMftttY 






^FSf, 




NO. 


1 rW 


MA^FN'T 


Cwu. 


r^FSCRI^'TT3N 


inoo 


t 









linn 


? 


U^no 






l?nri 


? 


innn 


1 




nor 


?. 


1000 


. 




nio 


3 


11 '10 






11<?0 


3 


1 1 00 


.;■ 




i?i(i 


3 


1?10 


J 




1720 


4 


1200 


-J 




nin 


3 


1300 


■;'. 




13?0 


3 


130C 


■1 




131(1 


J* 


1300 


'; 




12?1 


<i 


1??0 






12?7 


** 


1??0 







1.1<l 


i* 


13?0 






13?? 


'» 


1320 






1323 


^ 


13?0 


•j 





1000 











1000 


1100 








1000 


1^00 








1000 


1300 








1000 


1100 


1110 





1000 


1100 


1120 





1000 


1200 


1210 





1000 


1200 


1220 





moo 


1300 


1310 





11)00 


1300 


1320 





inoo 


1 300 


1330 





1000 


1^'JO 


12?0 


1221 


inoo 


1200 


1220 


1222 


1000 


1 300 


1320 


1321 


1000 


1300 


1320 


1322 


1000 


1300 


1320 


1323 



rtlEQAi^CHY TABLE 



U 

U 








U 
U 
U 
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u— a-41 



?<>r>f'0''n t 111:: "' 

111 '■"'<• ^ 

1 1 '10 "CO * 11?:.' 1 

ij.in'-of'o » 112' " 

2ii»0'''>*o ** ]7^• 

?? >0' (1 '0 * ''-"i:: " 

v^.ioooci) 4 i?i" r, 

*»lor.---r!f»i b 1?2? '• 

I 1 '"iS 

?ISh«. :! 

SI in O'lP •< I"*!:'' 1 

r»?'iil ■ncn ** ! "^V^ n 

llO^'h'' 

>)3()0"0i.>0 4 l''!'' 'y 

1:'?>664 ■) 

S*ooi:C,in * i'>io 1 

ll?f.*4 J 

hl'iOOCO 5 I''?! 

Pllfc-j 

H 10 >0 S !•>?? 

I2i;ii>* t' 

7»iiO-OfO 4 !•>?? 7 

IHlXb* ;) 

Ri'miOi s 1 >?i •) 

nil"* u 



17 »s02le> 
)7 O50U2 
b9 6*1203 
17 o'507ifc 
71 6S0flO4 
nl BbOSlO 
<0 hWSlB 
17 SStM13 
1^2 «.412ll 
'7 <>b03<!b 
'7 (•'jOSOb 
37 6b01)S 
37 SHlZiS 
37 h'.lllO 
77 (>412<!2 
17 650308 
10 iSOlt^V 
70 6504^9 
37 »>i01i!0 



10 10 UOO 
J 650216 <.b0226 

lOtiO 1100 
3 65.1112 "SOlai! 

lOOO 1100 
3 6*1111 141223 

lO'lO 1100 
3 650726 650BUb 

1010 UOO 
3 650tl0» nbO'ii* 

1000 1^00 
3 650610 6i0»<05 

10110 1200 
3 650527 nSn715 

lOOO 1200 
3 650913 650924 

1000 1200 
3 6*1211 650*2» 

1000 1200 
3 650326 ^5n520 

10:iO 1200 
3 650605 650629 

1000 1300 
3 6*1026 641119 

1000 1300 
3 6*1223 650121 

lOOO 1300 
3 6*1110 64120H 

1010 1300 
3 641222 650217 

1000 1300 
3 650308 650314 

1000 1300 
3 650429 650617 

1000 1300 
3 650*29 650617 

1000 1300 
3 650120 650215 



HIEMARCHY TABLE 

UIO 

I 15 15 650216 650226 6*0923 

1110 

i 10 10 650112 650122 6*1123 

1110 

I 10 5 6*1203 650122 6*0917 

1120 

20 27 27 650726 650805 650329 

1120 

2^ 30 30 65080* 650924 650619 

1?10 O 

20 27 27 650610 650805 650308 

1210 

23 28 26 650618 650820 650*15 

1210 n O 

26 30 3o 650913 65092* 650505 

1720 1221 

a 9 9 6*1211 650*28 6*1128 

1220 1222 

14 24 2* 650326 650520 650112 

1220 1222 

1/ 25 25 650505 650629 650229 

1310 

I 14 * 650115 650310 6*0917 

1310 O 

» 11 11 6*1223 650121 6*1018 

1110 

* 7 T 6*1110 6*1208 6*1008 

1310 

H 12 1? 6*1222 650217 6*1117 

1320 1321 

15 19 19 650308 650318 650218 

1320 1322 

13 22 22 650*29 650617 6*1211 

1320 1322 

in 23 23 650*29 65061T 6*1217 

1320 1323 

6 16 16 650120 650215 6*1111 



1000 1300 1320 1323 



9)001000 * n3o 

31765 



17 650308 
17 651005 



3 650308 650318 



20 20 650308 650318 6S0120 



1000 1300 1330 
3 651005 651015 20 31 31 651005 651015 6S0308 
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FILt THUHF . COST FTLF 



PERf. 



HfS. 

CSnf 



CHuRGf NS 



UATt 



1 cinoaco 



BlinGETS 


ESTIMATtS 


! 


T 1 000 


U 


3*00 





3150 


U 


2 1 SO 


II 


bSO 





2300 





15" 



ACTUALS 
HOURS DIRECT TS 



23*01- 
35SC. 
23S'J 
360(J 
7250 
•20O 
«0U 



489^1 
*«hb 



ieo3S" 

361I1.- 
*7SU 

asoij 

3SU 

*0'1 
3Si- 

60) 
3S^^ 
2011 

25i.i 
*()•> 

6S'J 
»%■• 
SSu 
20-1 



COMMITTED COSTS 
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10.1 



23CCO000 



COR I 



J 


Ij 


f\ 








u 




!• 








^ T 


1000 











J 


UOOU 











y> 


<ltSi) 


n 











;,j 











u 


u 














'J 











T 


500U 











u 


M301I 











(J 


c:bO0u 


u 








u 


17S0L' 














\) 


u 








u 


u 











u T 


7S0 











l> 


901- 














u 











u 





























u 


u 











U 


alZDi; 











[> 


J4700 











u 





a 








u 


u 














u 











u 














U H 


3620 











u 


3603 











u 


2450 











'J 

















u 


























T 


455U 














90U 





(1 








1500 


a 























u 


d 


























U H 


5*00 














250 











d 














u 














u 














u 














U T 


15000 











u 


B50 











u 














u 














u 














u 














U D 


700 














300 


. 
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»? OCR* *?CnoiOO 



ii rcK? %i«ooooo '-• 



ij? fi.-il! S?nouOOO u 



s,^ f;-Qb S'^nr.ultOO ■- 



<,j miRT 5iooi.ono I.' 



•iiL OCR? SiOnuOCC f' 



61 C';«i fti-owocn c ■' 



M eOBIl TV'OUOOO " f- 



71 (V«2 H'^^lvJOGn '' 

































u 














u 


7300 














20SO 














»70i) 














60U 











u 


u 











u 


'J 











u T 


600 











u 


13SJ 











u 


200 














100 














ITOU 





c 





u 


400 











H 


l»Z5U 














16300 











1.1 


1370J 











(J 








n 




















u 














«.> u 


<:3Soo 











u 


u 












































•;i 














1; 











u 


160O 


























u 














u 
































i; 











li I 


42511 














zooo 











« 


u 





u 





u 


u 














u 











u 

















173«5'J 











o 


ij 





























u 














u 


























U H 


360U 











u 


3750 





11 








400 














6400 














12350 











" 


blOO 











c r 


4500 














S00l< 
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u-a— 10 



O-Bl 



7?'^n0o0li 



u 


50'J 


■1 


n 







1100'! 








n 





i9B().' 


fl 








u 


»5oy 


1 








11 


izoo 





y 





u 


125't 





(-. 





u 


lasu 


:1 








1.' 


1250 


n 








u 


12S0 











u 


»5i.- 











(; H 


I25y 


U 











lao'j 


(1 








u 


l*4v> 














1350 











u 


IZOU 





(1 





u 


o 











'J 


?soy 











y 


300V 


n 


n 








»osy 





() 





y 


3Z0C. 











y 


i*oy 

















n 








U 11 


400 














125(1 





c 





u 


135'j 











l> 


f^'-J 











u 














u 


rj 











u u 


3550 


n 


u 





u 


B5'j 


y 








u 


y 


f) 








I? 


u 











y 


'1 











u 


^) 


n 








1) 


70'J 














1050 











(i 


ISO'i 











y 


i*oy 











t." 


;J 











u 





(1 
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FiL? i-'S'"* - -"TF rll> 



FWF.CMM 


, ^fS.CSPF 


"ATcS (l- 


Ivi- 


T'J PV YYH* 


Utn KATF. 


4NU OWErtMEAO HdlEI 


■ I 


Ou»l 


0^(^ 


1,'.' 




hno 






•^ 


OijS? 


o«<' 


\0- 











J 


00»3 


OHi 


in 




:)on 








00^^* 


Oil? 


10 




UlO 









frjws 


a^? 


10- 




s" 






.■ 


CSWft 


b<^i' 


10' 











■■: 


■;|-.»7 


0-.^ 


10- 




loo 






MasTF- 


TlhT t^l) ;r 


FILE. 













C36 IrST TFST IFOO 1?uO »F"T/cSSTl 



LEVFL / Sil^'MAt-Y TTPM - i / 



l-'Oli 



PERT/CCST 
rtANASEMfMT SUMMARY REPCRT 



BEPSHTING 0H6N. 



conthact ho. 

333 



LfVFL 1 



LEVEL ?- 



COST SF WO"K / UNITS - DOLLARS 
,';=K pfhfCwmFO to OATt TOTALS AT COMPLETION 

LATEST 



TERM - 

CUT-SFF DATE 9/1T/6* 

RELEASE DATE 9/17/64 



COST UNDt'^xil'^ COST 



HOST 
PROJECTEO Ci<IT 
titkiuoaiir.i^ ^1 Art.* rf* 



SCHEDULE 
S - SCHEO COMPL DATE - TOTAL ITEM 
A - ACTUAL COMPL DATE - TOTAL ITEM 
E - EARLIEST COmPL DATE - CRIT ITEM 
L - LATEST COMPL DATE - CRIT ITEM 
p 196^ 1965 67S9L 



tSTIi-ATE UNOERRUN (WKS) DATE YRJFMAMJJAS CNOJFMAMJJASCND 



10/ S/65 

10/ S/6S 

70Z?T5 (70?27B) 1,7 10/1S/6S 

«/ 4/65 

7/26/65 

1SV905 |1Z990'>) 1.7 8/ 5/65 

9/13/65 

9/13/65 

19?520 (197S2'i) 1.7 9/24/65 

10/ S/6S 

10/ S/65 

37-.850 (3748501 1.7 10/15/65 



YR 



UNCUeS^TFIEIi 



PAGE 1 



60237000 



DEHI/CCiT 
PP3S»(ln/P» = jeCT STSTUS -JEPOrtT 



HEP3«TI IS SWH. 



C3* TF';! T^ST (Crc -svi.:; i>r-.T/rr;ST! 



CSNTB4CT k3. 
333 



TERM - 

eUT-SFF DATE 9/17/** 

BELEASE DATE 9/17/6* 



int'jTiFrrAT:i-ii 



1 iMt ST«TUS 



CHAR•■.^" Z'- 



2no ■'^;:l:• 
1 l?n 
ii>o-c:o 



!?■ 

J1iio.0"C 
U'«CLo'!SIFIE'' 



SCmO op FAKLltST MOSt 
I HkST LSI?! -iCt (A1 -LATfbT rSJT 



COST OF WORK / UNITS - DOLLARS 
ORK PEHFOBMtfl to DATE 



TOTALS AT COMPLETION 

LATEST PROJECTED 



VFM C-"iOL COWL SLACK VALUK ACTUAL (OVERRUN! PLANNED REVISED (OVERBUNI 
"o. O.TF IJATF (WKS) COST UKDERRUN COST ESTIMATE UNOEHRUN 






10/ 5/*5 1.7 
r)/15/<>S M 



»/ 4/*5 1.? 



^/?*/65 IS 



a/16/65 1.7 
i/^h/bi 15 



1/12/oS 1.7 
1/22/65 10 



\i/ 3/6* 5.9 
1/22/65 5 



rt/ 4/65 1.7 
4/24/bb ?7 



7/26/65 1.7 
H/ 5/65 27 



»/ 4/65 


7.1 


i*/24/6b 


50 


'</n/65 


1.7 


')/24/65 


30 


■J/lS/bS 


1.7 


9/24/65 


30 



6/10/65 «.l 
H/ i;/6S 27 



702275 (70227S1 

129905 (129905) 

10*905 (10*905) 

57650 (S76S0) 

9755 (9755) 

37500 (37500) 

25000 (25000) 

3550 (3S50) 

21*50 (21*S0) 

197520 (1975201 

159970 (1S99T0) 

55S00 (55800) 

PAGE 1 
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PE><f/COST 
PB3SH*"/Pm2JECI status ■<EP0>*T 



iJtTpSKTIUfi CH6N. 



C36 rF>=T Tr.ST (F-u ■'PC,' PF'<T/cOSTi 



CSNTRAC1 kC. 
333 



TEHM - 

CUT-OFF DATE 9/17/6* 

HELEASE DATE 9/1T/64 



LEVEL / SlV'-'/'-'-'r Itfv . J / lrrj'\ 

infMTIFIr/>Tro.» 



1 iMt STOTUS 



CHoP'iF OJ 



12?1 

urn— !--o 

4inc- cm 

4?on •':■ n 

i3':r 

I3)r. 

S?iO- 0!0 
UNCLA'SSIFIEO 



COST SF -"SOK / UNITS - DOLLARS 
»0H« PF«FSPMED To BATE 



i 



SCp.. SR FA-LItST «OSr .0«« PF«fOPMED To BATE TOTALS AT MMPLETISN 

,- .*. . /.Tf<ci /<u1t LATEST KK„jti,ic.u 

^i:^; '^U 'Z^ -"^ SLi« VALO. .CTueL .=yE««U., PLA.NEO REVISED^ -OVEPPU., 



1)»TF 



KATE 



(MKS) 



n/l«/6S 7.0 

fi/?n/oS io 



V/ 13/65 
>)/^<i/6S 



1.7 
30 



-,/ S/65 7.7 

t>/2<>/*S « 

li/ll/ft* 19. i 

»/2S/bS 9 

l?/ll/e>4 19.2 

»/2»l/b5 9 



■5/ 5/f>5 
0/29/65 

J/26/65 
^1/20/65 



b/ S/6S 7.7 
h/29/65 2S 



7.7 

25 



7.7 

21 



10/ 15/65 



1.7 
Si 



1/15/65 3./ 

J/10'6S U 

1/15/65 3.7 

3/10/65 * 

12/23/B* 3.7 

1/21/65 11 



COST lINOEPPUN COST ESTIMATE UNOEBSUN 

8 7550 (875S0> 

16620 C166Z0) 

37550 (37550) 

5650 (S65D) 

5650 (5650) 

31900 (31900) 

I6S50 ( 16850) 

15050 I150S0) 

374850 (37*850) 

79950 (79950) 

*350 (*350) 

**2S0 (**2S0) 

PASE 2 



60237000 
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pr«T/CEST 
PB3ijK4W/l>PCjECT STaTUS •<EPO''T 



C36 IF«T TfST IF'" 7?0' up'-T/caSTl 



lEPSkTIiJ"; S-<<SU, 



llMt STATUS 



contkuct ko. 

333 



TERM - 

CUT-CFF DATE 9/17/«« 

RELE«SE DATE 9/1T/6* 






S3->0-C"0 



UNCLASSIFIEU 



COST OF WORK / UNITS - OOLLAHS 
VO»n PEHFORMEn To DATE 



SCun OP F««LItST MOST VS»K PEHFORMEn To DATE TOTALS AT COMPLETISN 
FTHST L4S1 ttCT (Al -LATEST c»IT LATEST PROJECTED 

^«t^T FWE't C-MPL CCHPL SLACK ValU*: ACTUAL (5VEHHUN) PLANNED REVISED (OVERRUN! 



IMTF 



UATE 



(WKSl 



13?n 


-^ 


fr 


^:^ 


IV) 


4 


JC 


IV 


k-\'>n^O~V 


s 


lb 


19 


13?? 


4 


13 


<?2 


7vo-i0"n 


'. 


n 


<?2 


72-.>n-r'"o 


B 


1 *^ 


i.) 



^0 
31 



!l/10/l>* 3.7 
li>/ A/b* 7 



i;^/K2/b* ?.7 
i/17/B5 12 






3/ B/bS 
J/lA/bS 



1.7 

19 



1.7 
If 



3/ p/bS 1.7 
J/lR/bS 19 



»/a9/bS 


7.0 
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23 
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J/lP/bS 


20 
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9/30/64 4 9/1T/64 


1.7 
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11/10/64 


11/2 5/64 


1.7 


7.6 


1000000 


3.» 


10/13/64 


U/24/64 


5.9 


3.6 


3000000 


5.3 
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11/19/64 


3.7 


5.3 
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4.3 


12/11/64 


lZ/23/64 


1.7 


11.9 
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4.1 


11/11/64 


12/23/64 


5.9 


7.7 
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4.1 


11/11/64 


12/30/64 


6.6 


7.7 
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2.3 


11/10/64 
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3.7 


7.6 
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l/lH/65 


7.7 


9.1 
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4.3 


12/11/64 


4/28/65 


19.2 


11.9 
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4.0 


1/12/65 


1/22/65 


1.7 


15.9 
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3,0 


12/ 3/64 


1/22/65 


6.9 


10.7 
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3.0 


12/ 3/64 


1/21/65 


6.6 


10.7 


81000000 


6.'; 


12/23/64 


1/21/65 


3.7 


13.6 
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4.3 


12/22/64 


2/17/65 


7.7 


13.4 
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12/11/64 
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19.2 


11,9 
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3.1 


1/15/65 


3/10/65 


7,7 


16.5 
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5.1; 


Z/ 16/65 


2/26/65 


1.7 


20.9 
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3.S 


1/20/65 


2/15/65 


3.T 


17,1 


81000000 


4.6 
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21.1 
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1.1 


12/18/64 


5/ 5/65 


19.2 


13.0 
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1.7 


23.7 


61000000 
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2/22/65 


3/18/65 


3.7 


21.7 


82000000 


O.U 
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3/18/65 


1.7 


23.7 


82000000 


2.^ 


3/ 5/65 


4/29/65 


7.7 


23.6 


42000000 
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4/ 5/65 


6/17/65 


10.6 


27.7 


71000000 


6.1 


1/ 3/65 


6/17/65 


19,2 


19,1 


72000000 


7.0 


4/29/65 


6/17/65 


7.0 


31.3 


71000000 


0.0 


4/29/65 


6/17/65 


7,0 


31.3 


72000000 


3.0 


3/26/65 


5/20/65 


7,7 


26.6 


41000000 


14. ■> 


6/16/65 


6/29/65 


1.7 


38.2 
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5.6 


S/ 5/65 


6/29/65 


7,7 


32.2 
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4.1 
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13. (• 
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S.l 
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5.b 
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3.1 
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9.0 
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2.1 
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1.7 


45.8 
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6/30/65 
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7.1 


40.2 
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OATE REMAININO 

comp/sched slack time account no 
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T.e. 


11/10/6* 


4.3 


12/11/6* 
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2/16/65 


2.0 


3/ 8/65 


0.0 


3/ 8/65 


1*.S 


6/16/66 


5.S 


7/26/65 
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8/ 9/65 
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9/13/65 


3.1 


10/ S/6S 


5.3 


10/26/64 


2.3 


11/10/6* 


6.0 


12/23/6* 


3.5 


1/20/65 


4.6 


2/22/65 


3.* 


10/13/64 
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11/11/6* 


4.1 
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12/ 3/64 


3.0 
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12/18/6* 


6.1 
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9/30/64 A 9/17/6* 

11/23/64 

12/23/64 

1/22/65 

2/26/65 

3/18/65 

3/18/65 

6/29/65 

8/ 5/65 

8/20/65 
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10/15/65 

11/19/64 

12/ 8/64 
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3/18/65 
11/24/64 
12/23/64 
12/30/64 

1/21/65 

1/22/65 

6/17/65 

6/17/65 
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8/ 5/65 

8/19/65 

9/24/65 

1/18/65 

2/17/65 

3/10/65 

4/12/65 

4/29/65 

5/20/65 

6/29/65 

8/ 5/65 

8/ S/65 

8/20/65 

6/17/65 

4/28/65 

4/28/65 

5/ 5/65 

6/17/65 

9/24/65 
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7,6 
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11.9 


2000000 
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1000000 




2.3 
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U/11/64 
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62000000 
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4/28/65 
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0.0 
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19.2 


13.0 
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12/22/64 
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13.4 
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4.0 


1/12/65 
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41000000 
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2/22/65 


3/18/65 




3.7 


21.7 


saoooooa 




Z.b 
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4/29/65 




T.7 


23.6 


42000000 




-Si-» 


3/ «/6S 


3/18/65 




l.T 


23,7 


-6H>00000 




0.0 


3/ 8/ 65 


3/18/65 




l.T 


23.7 


82000000 




3.U 


3/26/65 


5/20/6S 




T.T 


26.6 
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6.H 


4/ 5/6S 
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27.7 
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7.6 
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31.3 
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6/17/65 
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MCTIV. OATt OATE HEMAININS 

TIMfe EXPECTED ALLStlED CSMP/SCHED SLACK TIME ACCOUNT NO. ORB. 



O.u 




9/30/64 A 9/17/64 


1.7 


0.0 





7.6 


11/10/64 


11/23/64 


l.T 


7.6 


1000000 


«.l 


11/11/64 


12/30/64 


6.5 


7.7 


1000000 


6.0 


2/16/65 


2/26/65 


1.7 


20.9 


1000000 


4.3 


12/11/64 


12/23/64 


1.7 


11.9 


2000000 


*.u 


1/12/6S 


1/22/65 


1.7 


15.9 


2000000 


4.1 


11/11/64 


12/23/64 


5.9 


7.7 


3000000 


3.U 


12/ 3/64 


1/22/65 


6.9 


10.7 


3000000 


3.f> 


10/13/64 


11/24/64 


5.9 


3.6 


3000000 


14.5 


6/16/65 


6/29/6S 


1.7 


38.2 


11000000 


s.s 


7/26/65 


8/ 5/65 


1.7 


43.7 


11000000 


2.0 


6/30/65 


a/19/65 


7.1 


40.2 


12000000 


5.'' 


«/ 4/65 


9/24/65 


7.1 


45.2 


12000000 


S.l 


6/ 3/65 


»/ S/6S 


9.0 


36.4 


21000000 


13.6 


6/I0/6S 


8/ 5/65 


8.1 


37.3 


21000000 


4.1 


S/27/6S 


7/15/65 


7.0 


35.4 


22000000 


3.1 


6/1H/65 


8/20/65 


9.0 


38.5 


22000000 


3.U 


6/17/65 


8/ S/65 


7.0 


38.4 


23000000 


2.1 


a/ 9/65 


8/20/65 


1.7 


45.8 


23000000 


4.» 


9/13/65 


9/24/65 


1.7 


50.6 


23000000 


4.-1 


12/11/64 


4/23/65 


^9.^ 


11.9 


31000000 


O.u 


12/11/64 


4/28/65 


19.2 


11.9 


31000000 


4.6 


2/17/65 


4/12/65 


7.7 


21.1 


41000000 


3.0 


3/26/65 


S/20/65 


7.7 


26.6 


41000000 


i.i 


3/ S/6S 


4/29/65 


7.7 


23.6 


42000000 


5.6 


5/ 5/65 


6/29/65 


7.7 


32.2 


42000000 


3.1 


1 /lKy65 


3/1 0/65 


7.7 


16.5 


51000000 


5.3 


10/26/64 


ll/l'*/64 


3.7 


5.3 


51000000 


3.C 


11/20/64 


1/18/65 


7,7 


9.1 


52000000 


6.U 


12/23/64 


1/21/65 


3.7 


13.6 


52000000 


2.3 


11/10/64 


12/ 8/64 


3.7 


7.6 


53000000 


4.3 


12/22/64 


2/17/65 


7.7 


13.4 


54000000 


Z.» 


3/ 9/65 


3/18/65 


1.7 


23.7 


61000000 


6.« 


4/ 5/65 


6/1T/65 


10.6 


27.7 


71G00000 


7.6 


4/29/65 


6/17/65 


7.0 


31.3 


71000000 


1.1 


12/1R/64 


5/ 5/65 


19.2 


13.0 


71000000 


0.0 


4/29/65 


6/17/65 


7.0 


31.3 


72000000 


6.1 


2/ 3/65 


6/17/65 


19.2 


19.1 


72000000 


3.S 


1/20/65 


2/ 15/65 


3.7 


17.1 


81000000 


3.0 


12/ 3/64 


1/21/65 


6.6 


10.7 


81000000 


4.6 


2/22/65 


3/18/65 


3.7 


21.7 


82000000 


0.0 


3/ 8/65 


3/18/65 


1.7 


23.7 


82000000 


8.6 


5/ 6/65 


9/24/65 


20.0 


32.3 


91000000 


3.1 


10/ 5/65 


10/15/65 \ 


1.7 


53.7 


91000000 
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li 
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T^ 
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1« 
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?" 


tVFWT 
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?1 
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?? 


FtfFNT 


?? 




?1 


FVtNT 


21 




?t 


FVtNT 


J4 




T^ 


^uFkT 


?R 




?«. 


SVfc'JT 


?* 




?7 


FtfFNT 


■?7 




?■* 


KVKNT 


?U 




?v 


'•"VFNT 


?« 




T> 
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SO 




11 


FVFNT 


1! 


T 


FTiun 0- 


•■^.^ PADSF '00' 



IFP3HI iNii 


SBlih. 


CONTRACT NO. 


TEBM- 










333 


HEPOST 
RFLEASE 


OATE- q/17/6* 
DATE- 9/17/6* 








LATEST 








"1LEST5NI-: 


EXPtcTEO 


ALLS''Ai<LE 


SCHEUIJlEB 


ACTUAL '. 


SLACK 


CSKE 


n"TE 


OATE 


DATE 


OATE 




1 




9/3':!/*>» 




9/17/6* 




2 


U/lo/6ft 


U/23/'.4 


11/13/6* 






1 


l0/13/h4 


11/24/64 


10/11/6* 






4 


10/<;iS/64 


ll/l»/»4 


10/26/6* 






5 


12/11/6* 


l2/2J/f>4 


12/14/6* 






6 


ll/U/b* 


12/3'/6ft 


11/16/6* 






7 


H/10/64 


12/ «/64 


11/16/6* 






^ 


ll//iO/'»* 


l/l»/*.5 


11/23/6* 






10 


1/12/6S 


1/22/ftS 


1/ H/65 






11 


l2/<n/64 


l/21/«» 


12/24/6* 






12 


12/2?/6» 


2/1 7/65 


12/24/6* 






13 


12/ll/t>» 


4/2>*/65 


12/24/6* 




19.2 


1« 


l/lS/6b 


3/l'i/6b 


l/lH/65 






IS 


Z/lft/bS 


2/26/^S 


2/12/65 






1% 


l/2n/65 


2/1S/65 


1/22/65 






in 


12/IH/b« 


5/ S/65 


1/11/65 




19.2 


19 


3/ B/6S 


3/1H/65 


3/ 5/65 






t^i 


3/ «/*S 


3/l'</6S 


3/ 5/65 






<'\ 


3/ S/SS 


*/2'*/6b 


J/ 15/65 






i2 


4/i9/6S 


6/17/65 


5/ 3/65 






<;3 


4/ii9/65 


6/17/65 


5/ 3/65 






<;4 


3/<?6/4b 


5/an/65 


*/ 6/65 






is 


6/U/6S 


6/2«/65 


6/1B/65 






<?(. 


5/27/6S 


7/1S/65 


6/ */6S 






^7 


7/^A/6S 


«/ S/65 


8/ 2/65 






»■« 


a/ V/bS 


B/2'l/6S 


f/lt/ftS 






<:« 


fi/3o/6S 


H/l'i/ftS 


7/12/65 






JO 


9/13/65 


9/24/65 


9/22/65 






31 


10/ S/65 


10/15/65 


10/15/65 
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4. 7. 8 REPORT GENERATOR 



RS-32 



(1.0) 



L 
L 



0UT1 ASSIGN PRINT BUF 1 LOw BCD UNIT Ol 
THERE IS NO RECORD AREA AN ERROR MSQ SHOULD APPEAR 

REPORT 

«••*« pDll •*«»* 
OUTl RPTFMT 
DETAIL DETAIL 
THIS IS A NON STANDARD LABEL 

RPTOT 
THIS IS THE END 
JERRY PROCEO 

OEN DETAIL 

END 



4.7.9 SAINT 

4. 7. 10 SCOPE UTILITY 

UTILITY HAS BEEn INSTALLED ON THIS LIBRARY, 

4. 7. 11 TAPE SORT 



I FTNO 0060 


STOP 


SORT 








OllZZlHF 


t 040301 U00090010 


1ISI00800080F BMOl OISOISORT-FILE . 0112316B01999 


10 O00803040F HM C 


9ENDS0RT 






I TSRT 


213 


B 


INTERNAL MERGE IP LOG UNITS 


04.03. 








I TSRT 


214 


B 


INTERNAL MERGE OP L^Q UNITS 


01. 








A TSRT 


323 


B 


UNIT 01 FOR SORT IP, 


I TSRT 


239 


B 


IB 20 OB 2000 894 t 


A TSRT 


303 


B 


UNIT 1. MOUNT SCRATCH, 


I TSRT 


222 


B 


38 IN 


I TSRT 


223 


B 


38 OUT 


I TSRT 


232 


B 


1 SEO 


I TSRT 


236 


B 


FINAL MERGE 


A TSRT 


305 


B 


UNIT 1. MOUNT 0/P TAPE, 


I TSRT 


216 


8 


UNIT 1, FINAL OUTPUT. REEL 01, 


I TSRT 


222 


B 


38 IN 


I TSRT 


223 


B 


38 OUT 



tThe OB and G figures are site dependent and will varj^ under a 32K or 16K system. 
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PART III 



INSTALLATION-RELATED INFORMATION 



HARDWARE INITIALIZATION 



1.1 INSTALLATION AUTOLOAD ROUTINE 

Each installation must manually establish an autoload routine in the autoload region of core. This 
routine is a basic and permanent machine entry. It is used to initiate machine operations, such 
as autoloading RTS or initiating a 512 image. 

The tape/card reader autoload procedure serves a dual purpose. It can autoload from tape unit 
or from the card reader if SELECT JUMP 6 is set. It halts at location xxx50 to allow hardware 
action to complete. (There is not enough space to check status. ) When device motion stops, press 
GO to continue. 



The format of the tape/card reader autoload routine is: 



Location 

xxx40 
xxx41 
xxx42 
xxx43 
xxx44 
xxx45 
xxx46 
xxx47 
xxx50 
xxx51 
xxx52 

xxx53 
xxx54 
xxx55 
xxx56 
xxx57 



Instruction 

006xxx52 
770cc000 
010xxx41 

771c0010 
010xxx43 
740xxx70 
cOOOOOOO 
010xxx45 
77770000 
01000000 
770cc000 

010xxx52 
740xxx37 
cOOOOOOO 
010xxx54 
OlOxxxSO 



Comment 



If SELECT JUMP 6 is set, load card 

Connect channel c, equipment e, tape unit 

Reject 

Rewind channel c 

Reject 

Read first tape record into location 00000 

Reject 

Stop 

Go to program, location 00000 

Connect card reader unit 0, channel c, 
equipment e 

Reject 

Read first record into location 00000 

Reject 

Go to stop instruction 



An alternate autoload procedure may be used if error checking is desired (on magnetic tape only). 
The routine reads the library tape, loads the first record of RTS into core, and jumps to address 
0. The routine checks for tape parity and lost data errors. If detected, the routine halts at 
xxx54 with the status of the unit in the A-register. To retry, the operator must press GO. 
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The format of the alternate autoload routine is: 



Location 


Instruction 


Comment 


xxx40 


770ce00u 


Connect 


xxx41 


010xxx40 




xxx42 


TTlcOOlO 


Rewind 


xxx43 


010xxx42 




xxx44 


740xxx70 


Input 


xxx45 


cOOOOOOO 




xxx46 


010xxx44 




xxx47 


772C0002 




xxx50 


010xxx47 




xxx51 


■77200000 


Check status 


XXX52 


17602400 




xxx53 


03000000 




xxx54 


000xxx42 


Halt and return to rewi 



The installation must supply the following parameters: 

c Channel number appropriate to equipment 
e Equipment number appropriate to unit 
u Unit number 

xxx is dependent on machine size and type as follows: 



Memory 


Type 


xxx 


16K 


3100/3150 


376 


32K 


3100/3150 


776 


16K 


3200/3300 


377 


32K 


3200/3300 


777 



Tn-1-2 
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AET 



AET defines the equipment available to the system. Each AET entry consists of two 24-bit words 
and an external definition which describes the hardware device and the system driver servicing it. 
Any channel or equipment dedicated to real-time or specialized operations must not appear in the 
AET. 

The format of the AET entry is: 



23 




17 






14 




1 1 
J. J. 




00 


a 


h 


s 


r 


cp 


m 


i 


CO 



EXT driver entry point name 
23 14 



00 



daddr 



If two devices are serviced by the same driver, the second external definition may be omitted 
since only one definition is necessary. 

The inscriptions are defined as follows: 

a Unit not assigned; a is set to initially in AET for all entries which are not 
designated as system units. 

1 Unit assigned; a is set to 1 initially in AET (e. g. the library device) for all 
entries designated as system units. 

h Numeric hardware code. Each code represents a different hardware type. 

07 Paper tape punch (TP) 

10 Typewriter station (TS) 

11 Incremental plotter (PL) 

12 Satellite controller (SL) 

13 Disk pack controller (DP) 

15 Drum (DR) 

16 Optical character reader (OR) 

Implies unit is operable. 

Implies unit is inoperable. Generally s is set to for all entries unless a unit is 



01 . Magnetic tape (MT) 

02 Card reader (CR) 

03 Printer (PR) 

04 Card punch (CP) 

05 Typewriter (TY) 

(console) 

06 Paper tape reader (TR) 



cp 




1 


1 


1 



temporarily down or not yet available for use. 

Unit assigned for use by this computer. 

Unit reserved for use by another computer. 

No transmission parity error detected. 

Transmission parity error has occurred on previous READ, WRITE, READB 

operation. 
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m 



cc 



Batch program indicator. 

1 Priority program indicator. Set m at as this bit is manipulated only by RTS. 

Twelve bit connect code of the particular unit to which this entry relates, cc is 
euuu where: 

e One octal digit equipment number, 

uuu Up to three octal digits right justified represent the unit number. 

No action. 

1 Unit to be assigned. Set e at as this bit is manipulated only by RTS. 

Eight-bit channel code specifying the channels available to an equipment. A bit set 
at 1 means the corresponding channel is available to a unit; a bit set at means the 
channel is not available. The following table shows the correspondence between bit 
positions and channel numbers. 



Bit Position 


22 


21 


20 


19 


18 


17 


16 


15 


Corresponding 
Channel 





1 


2 


3 


4 


5 


6 


7 



daddr A 15-bit address which is the entry point name of the appropriate driver (see driver 

selection previously described). A zero value in this field indicates a nonresident 
driver and thus, a nonsystem unit. When RTS loads a nonresident driver, it sup- 
plies a driver address in this field. A system unit entry must have driver address 
in the daddr field. 

Entry point names to be used in this field for the various equipments and their drivers are given in 
the table. Specific COSY corrections for adapting the AET to a particular installation are not given 
because of the diversity of configurations. Instead, the COSY correction causes the complete 
deletion of the AET and the user must insert his complete hardware description. A general format 
of the AET is: 



III-2-2 
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AET 



EXT 



entry 1, word 1 
driver entry point name 



+1 




entry 1, word 2 


+ 2 




entry 2, word 1 




EXT 


driver entry point name 


+3 




entry 2, word 2 


+4 




entry 3 , word 1 




EXT 


driver entry point name 


+ 5 




entry 3, word 2 


+ 6 




entry 4, word 1 




EXT 


driver entry point name 


+ 7 




entry 4, word 2 


+ 8 




entry 5, word 1 




EXT 


driver entry point name 


+ 9 




entry 5, word 2 



Library 



CTO/CFO 



INP 



OUT 



PUN 



In this scheme, the preceding are system units and the following are available units for batch or 
priority use. 



+ 10 




entry 6, word 1 




EXT 


driver entry point name 


+11 




entry 6, word 2 


+ 12 




entry 7, word 1 




EXT 


driver entry point name 


+ 13 




entry 7, word 2 



Available equipment 



Available equipment 
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SYSTEM DRIVERS 



Hardware 


Controllers 


Equipment 
(in combination) 


COSY 
Name 


Entry Point 


MT 


362x 
342x 
322x 


604 
607 


DRIVLABT 


DRIVEROl 


MT 


362x 
342x 
322x 


601 
603 
606 


DRIVLABT 


DRIVEROl 


MT 


3518 
3528 


657 
659 


DRTVMMTC 


DRIVEROl 


CR 


3447 
3649 


405 


DRIV3649 


DRIVER02 


CR 


3248 


405 


DRIV3248 


DRIVER02 


PR 


3256 
3659 
3152 


501 
505 


DRIV3659 


DRIVE R03 


PR 


3555 


512 


DRV512 


DRV512 


CP 


3644 
3446 


415 


DRIV3644 


DRIVER04 


CP 


3245 


415 


DRIV3245 


DRIVER04 


TY 


Console 
typewriter 




DRIVTYWR 


DRIVER05 


TR 
TP 


3691 


Paper tape 
stati(xi 


DRIV3691 


DRIVE R06 
DRIVER07 


PL 


3293 


Plotter 


DRIV3293 


DRIVERll 


OR 


3195 


915 


DRIVER12 


DRIVER16 
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RHT AND BRHT 



3.1 RHT MODIFICATION 

The RHT is a 63-character table defining the equipment used during a batch run and the ecpiipment 
assigned as system units (PUN, INP, OUT, etc. ). In RTS, input/output units are referenced by 
logical unit numbers rather than by physical units. The character entries in the RHT, from 
character RHT+1 to RHT+63, correspond to logical units 01 to 63, respectively. Each RHT entry 
defining an equipment contains a nonzero value that is the ordinal of the AET and UST entry of the 
physical unit to which it is assigned. Certain system units must have permanent RHT entries as 
follows: 



LIB 


LUN 


63 


PUN 


LUN 


62 


OUT 


LUN 


61 


INP 


LUN 


60 


CTO 


LUN 


59 


CFO 


LUN 


58 



Each RHT position for logical units 58-63 must point to the appropriate AET and US i entries of 
an equipment with a resident driver. All nonsystem entries must initially be zero. The initial 
entries for system units PUN=05, CTO/CFO=02, OUT=04, INP=03, and LIB=01 need not be 
changed if the AET is in the described format. 

3.2 BRHT MODIFICATION 

The Priority Running Hardware Table (BRHT) is similar to the RHT except that only logical units 
1-49, 58, and 59 are available for reference by a priority program. Logical units 50-57 and 
60-63 are illegal units for a priority program and their BRHT entries must be zero; logical units 
58 and 59 are assembled to 02. The BRHT, like the RHT, contains 63 one-character entries 
from BRHT+1 to BRHT+63 that correspond to priority logical units 1-63, respectively. Entries 
for logical units 50-57 and 60-63 must be included in the BRHT but must have a zero value for 
detection of illegal priority program references. 



60237000 



PREUB 



The RTS product set includes PRELIB to modify and update the existing system library. 
PRELIB permits the user to: 

• Absolutize frequently used system programs (COMPASS, FORTRAN, etc. ) to eliminate the 
necessity of relocating and linking their routines each time they are called. 

• Place the variable resident routines (PROTECT, LOADER, OVPRO) in several places 
in the relocatable file (file 2) to reduce system overhead during library searches for 
needed routines. 

• Delete, insert, or replace those routines anywhere in the relocatable file. Rearrangement 
of file 2 can place the most frequently used routines near the beginning of the file to reduce 
library search time. 

System routines are absolutized either because RTS requires it (e.g. absolutizing resident in 
order to autoload it) or because doii^ so reduces system overhead. Whenever resident and 
variable resident are modified, all other absolute routines must be re-absolutized. 

Creation or modification of the library requires a minimum of three tape units; duplication of 
the library requires at least two tape units. 

4.1 LOADING AND EXECUTION 

PRELIB requires all of memory and may not share time with another program. The PRELIB 
user must be familiar with the PRELIB source deck supplied for installation (Part E, section 4. 1). 

PRELIB detail cards (PDC) are binary cards for the relocatable programs to be placed on the 
new library. Each deck must begin with an IDC card and end with a TRA card (see RTS 
Reference Manual). 

4.2 PRELIB CONTROL CARDS 

PRELIB control cards (PCC) direct PRELIB in the generation of a new library; they allow ad- 
dition and deletion of records and entry points. 

4.2.1 PRELIB 

The user loads PRELIB into core with the PRELIB statement. When PRELOAD encounters a 
PRELIB card, it calls the loader, which in turn calls OVPRO to load PRELIB and its overlays 
and segments from file 2 of the library tape. SEQUENCE, JOB, and any required EQUIP cards 
precede the PRELIB card. File 55, the scratch tape, must be equipped with an EQUIP, 55=MT, 
card. 

RTS gives control to PRELIB, which reads from INP. PRELIB executes automatically when 
called; a RUN card is not needed. 
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gPRELIB.Uj.Uo.S.A 

Logical unit (1-54, 63) previously assigned by EQUIP to original input tape; if 
PRELIB, ,Uq is used, standard INP logical unit 63 is assumed to be the input tape. 

Logical unit (1-54; different from u.) previously assigned by EQUIP to the new output 
tape. 

If S is present, PRELIB generates a suppressed history of updated files on OUT. If S is 
omitted, PRELIB generates a detailed history of updated files on OUT (section 4.4), 

Must be present if modifications include records to be absolutized and added to variable 
resident; A is omitted if modifications are for the relocatable file only. 



A comma follows the last parameter only if comments are to follow. 



□ oend-of-file 



JL 



L 



H 



JL 



/ 


/ PRELIB input deck 




/gPRELIB, , 1 






/^EQUIP, , 55 = MT, 01 = MT 








/^JOB,005,RH,15 










/gSEQUENCE.TSg 
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4.2.2 FILE 



If a FILE card is the first card in the PRELIB input deck, it causes file 1 to be copied on the new 
library tape; it does no absolutizing for file 2. A FILE card also signals the completion of 
absolutizing for the library; it follows all input data to be absolutized by OVl. A second FILE card 
in a deck signals the end of file 2 input. 



iFILE 



4. 2. 3 REPLACE 

A REPLACE control card may also be used to identify records in file 2 to be replaced. A 
REPLACE card may be followed by a file 2 UNIT card if the replacement records are not on 
INP. If a REPLACE card is the first card in the PRELIB input deck, it instructs the PRELIB 
to replace resident. Normally variable resident and all file 2 absolute records are also re- 
absolutized since changes in resident may affect the addresses of system entry points referenced 
by these records (see example, section 4. 3. 3). When used for this purpose, the REPLACE card 
has no subfields. 



gREPLACE, namcj, name^^ 

name^.namejj Subprogram on existing relocatable file or blank 

The possible combinations specify the following actions: 



name,- 



name^ 



specified specified 



blank 



specified 



specified blank 
blank blank 



name^=namejj 



Action 

Replace subprograms namej; through namcn 
with PDC records foUowii^ REPLACE on 
INP or with PDC records on xmit specified 
by UNIT card following REPLACE. 

Replace subprograms from beginnii^ of re- 
locatable file through namCjj with indicated 
PDC's. 

Replace subprograms from name^ to end of 
relocatable file with indicated PDC's. 

Replace entire relocatable file with indicated 
PDC's. 

Replace named subprogram with indicated 
PDC's. 
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4.2.4 DELETE 

A DELETE control card prevents the transfer of the designated records from the old library tape 
to the new one. 

The user must delete subprograms in the order of their appearance in the relocatable file. 

There is no provision for deletion of resident subprograms since any modification of resident 
requires replacement of all of resident, variable resident, and file 2 absolute records. 



gDELETE, name^, name 



namej, namej^ Subprograms on existii^ relocatable file or blank. The possible com- 
binations specify the following actions: 



name{ 



name^ 





specified 


specified 




blank 


specified 




specified 


blank 




blank 


blank 




namej=namej^ 


4.2.5 INSERT 







Action 

Delete subprograms name^ through name 
on the relocatable file. 

Delete subprograms from beginning of 
relocatable file through narne^,. 

Delete subprograms from namej throu^ 
end of relocatable file. 

Delete entire relocatable file. 

Delete named subprogram. 



An INSERT control card adds records that are not on the old library tape to the new library tape. 
They are inserted on the relocatable file immediately after named subprogram. If no subprogram 
is specified, the new records become the first records of file 2. 



gINSERT.name 



name Subprogram on existing relocatable file or blank 



4.2.6 TAPE 

A TAPE control card copies a requested file 2 absolute record from the old library tape to the 
scratch tape. 
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gTAPE.name.R 



name Name of file 2 absolute record to be copied on scratch tape. 

R Rewinds old library tape and writes an end-of-flle on the intermediate tape; 

used only on the last TAPE card in the PRELIB input deck. 

Each time PRELIB encounters a TAPE card or absolutizes a program, it fills one four-word 
entry in RECTABLE with the header for that record. The size of RECTABLE - a maximum of 28 
entries - determines the maximum number of absolute records allowed on the scratch tape. 

All absolutized routines to be added to file 2 must be on file 55 or on a imit designated by a UNIT 
card. 



4.2.7 UNIT 

A UNIT control card specifies the logical unit, other than INP, containing PRELIB detail card 
images. When a UNIT card is used to change resident or variable resident, it must follow an 
ORIGIN card or the PRELIB detail TRA card. When a UNIT card is used to control modifications 
of a relocatable file, it may follow a REPLACE, INSERT, or DELETE card. 



/' 



gUNIT.Uj.name 



Uj Logical unit containing PRELIB detail deck; if 55, record name must be 

given. 

name Specifies absolute record on logical unit 55 to be copied on the new library 
tape; if not used, the unit is read imtil an end-of-flle. 



4.2.8 MACRO 

A MACRO control card directs PRELIB to read Hollerith cards and write them on the new library 
tape in a form compatible with the system languages. 



/ gMACRO.p.u 



p Symbolic name, such as COMAC, that identifies a group of macros to be 

written. 

u Logical unit containing macro cards; if blank, INP is assumed. 

PRELIB adds a pseudo IDC card (word count of 41g) and then processes the MACRO cards. 
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Each ao-colunm Hollerith card is read into core as a 20-word BCD record modified as follows: 

Word 20 (columns 77-80) is deleted. 

Words 1-19 are renumbered 2-20. 

A new word 1 with a w field of Tig and with a g punch in column one is added. 

Two such cards are then written as a 40-word BCD card image. 

COMPASS requires that all system macros occur in COMAC. 

An END card (COMPASS Reference Manual) must follow the last macro in the PRELIB input 
stream. 

4.2.9 SYMROUT 

A SYMROUT control card directs PRELIB to copy file one onto the new library tape and 
absolutizes system routines (COMPASS, FORTRAN, etc.) according to cards that come after it 
in the PRELIB input deck. If used, it must be the first card in the PRELIB input deck. RECORD, 
ORIGIN, and UNIT or PDC must follow for each file 2 program to be absolutized. 



gSYMROUT 



4.2.10 RECORD 



A RECORD control card marks the beginning of a new record. It permanently specifies the lowest 
storage location used by any portion of the record when the record is absolutized. 



/ 



gRECORD.m 

m Symbol j^ octal address; symbol is any entry point previously defined; octal 

address is l-5g digits. Either or both may be omitted; if both are 
omitted, address zero is assumed. 

The m value indicates the beginnii^ of the record area of the simulated target memory used during 
PRELIB processing. Simulated target memory corresponds to target (execution time) memory. 



^RECORD, START+ 100 
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For example, START Is location 7438 and record area length is 4000g; the record area corresponds 
to the section of simulated target memory between 10438 and 50438. 

A RECORD card must be followed by an ORIGIN card. 



4. 2. 11 ORIGIN 

An ORIGIN control card designates a loading position within a simulated target memory. 



gORIGIN.n.i 

n Unsigned 1-5 digit octal number or previously defined entry point in file 1; 

previously defined entry point may be modified by signed ( + or -) 1-5 digit octal 

number; may be blank. 

If not blank, n must be greater than or equal to m on the preceding RECORD card. 

i Unsigned 1-5 digit octal number; it indicates number of words to be deleted from 

beginning of routine when record is written from core to tape; may be blank. 

4.2.12SEPOINT 

A SEPOINT control card must be used to define and enter any entry point into a permanent position 
in the loader symbol table (LST) . 



5 SEPOINT, name 

name File 1 entry point name; if undefined in file 1, it is address of ABNORMAL; if 
present, it is entered in LST. Otherwise TTTTTg is entered in LST. 

A SEPOINT card must be inserted directly after the LOADER record. When only system routines 
(e.g. COMPASS) are absolutized, SEPOINT cards are illegal. 

A SEPOINT card may be used to prevent the loadii^ of a subroutine or program; If the name 
specified on the control card is undefined, the symbol is equated to ABNORMAL, and the job will 
terminate. This technique is particularly useful for installations with optional floating-point 
and BCD hardware. For example, the following cards in file 1 input would prevent loading of 
hardware simulation routines FDPBOXS and BCDBOXS. 

SEPOINT, FDPBOXS 
SEPOINT, BCDBOXS 

Other undefined system entry points (CIP, etc.) do not invalidate the PRELIB as long as no 
routines refer to the undefined SEPOINT name. 

To link file 2 absolute records to system entry points, PRELIB generates its own loader symbol 
table. Therefore, if SEPOINT cards are inserted or deleted in resident, they should be inserted 
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or deleted in PLOVINT, the initializing routine of PRELIB. If this is not done, PRELIB may not 
load or a SYMROUT run may fail because of undefined references in COMPASS or FORTRAN. 



4.3 PRELIB EXAMPLES 

4.3.1 MODIFY RELOCATABLE ROUTINES 

Replace, delete, and insert relocatable routines in file 2: 



ggend-of-file 



LED cards, overlay control cards, etc. 
may also be inserted. To delete such 
cards, the decks before and after the 
card must be replaced. 



9 



FILE 



^/ (binary deck to be inserted, 

/ IDC to TRA) 

^INSERT, BCDBOXS 



^DELETE, OCTBOXS, OCTBOXS 



^ 



(binary deck of new DEBLOCK) 



Any overlay control card 
associated with a 
deck must be 
replaced with / 

that deck. 



ZrEPLACE, DEBLOCK, DEBLOCK 



7 FILE 



Zprelib, ,1,S 



ZeQUIP, 55=MT, 01=MT 



^JOB, , , , 



^sequence, 001 
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MODIFY file 2 relocatable routine on one system tape (lu=l) and place output on second tape. Use 
a third system tape as the operating system. (The contents of lu = l are not altered. ) 



'77 
88end-of-file 



Zfile 



PLOVINT binary deck 



deck 



'^gREPLACE, PLOVINT, PLOVINT 



9FILE 



9PRELIB, 1,2 



^EQUIP, 55=MT, 1=MT, 2=MT 



JjOB, , , .. 



gSEQUENCE.OOl 
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4. 3.2 REPLACE ABSOLUTIZED PROGRAMS 

Those products in file 2 partially comprised of absolute routines with overlays or segments 
(COMPASS, FORTRAN, etc.) can be modified during a SYMROUT run. Resident and variable 
resident need not be changed. 

For example, to replace only COMPASS: 





/77 
/ ggend-of-file 


/Jfile 


/^UNIT, 55, COMPASS 


/ ^REPLACE, COMPASS, COMPASS 






/7fILE 




\, 




(COMPASS deck to be absolutized) 


/^ORIGIN, START2, 3204 


/Record, start2 


/ ^SYMROUT 


/7PRELIB,,1.S,A 


/pQUIP, 55=MT, 01=MT 


/^JOB,,., 


^SEQUENCE, 001 
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Insert variable resident routines at other places on the library. 



77 
aaend-of-file 



FILE 



gUNIT, 55, PROTECT 



ZuNIT,55,OVPRO 



9UNIT,55,CKREC 



^UNIT, 55, PRELOAD 



/^UNIT, 55, PROTECT 



^INSERT, PLOV2 



^TAPE, PROTECT, R 



^TAPE,OVPRO 



^TAPE.CKREC 



qTAPE, PRELOAD 



§FILE 



^PRELIB, ,1,S 



^EQUIP, 55=MT, 01=MT 



gJOB, , , , 



ZSEQUENCE.OOI 
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PRELIB routines PHASE 2 and DEBLOCK write the absolutized records on the intermediate tape. 
These are transferred to the new library tape by file 2 UNIT cards. 

When the PRELIB input deck is relocatable binary card images on tape, a UNIT control card must 
follow the ORIGIN card but it cannot indicate tiie original library tape as the input source. 

After all records to be absolutized have been read, a ^FILE card follows, indicating the end of 
this phase of the absolutizing process (i. e. , the loading of the decks into target memory). Before 
any file 2 modifications are made, PHASE 2 links the absolute records to their external references f 
and DEBLOCK writes them as contiguous records on file 55. Those records in file 2 which have 
been reabsolutized must be replaced: 

^REPLACE, COMPASS, COMPASS 
9UNIT,55 

The unit card informs PRELIB that COMPASS has been placed on file 55 previously. The 
procedure is identical for all other file 2 absolute records. 



t Linking to externals is the reason that all absolute programs must be reabsolutized if resident 
is modified, since the absolute fw addresses of some system entry points probably have changed 
as a result of the modification. 



III-4-12 60237000 



4.3.3 REPLACE RESIDENT 

All absolutized routines must be reabsolutized each time resident is modified. 



/S 



[end-of-file 



( 



7fILE 



Note that the newly absolutized 
routines must be forcibly 
replaced using REPLACE 
and DELETE cards. 



(^7UNIT, 55, PROTECT 



AUNIT, 



55, DUMP 



( 



/^REPLACE, DUMP, PROTECT 
^FILE 



/Irecord. LSTLGTH 



All SE POINT cards 
follow the 
LOADER binary 
deck. 



( 



( 



/^SE POINT, GOFLG 
^^SEPOINT, BCDBOXS 



(LOADER binary deck) 



70RIGIN, START2 



j^^RECORD, START2 



I (RDUMP binary deck) 

f ^^ORIGIN, START2 

(^RECORD, START2 



(Resident decks) 



fgORIGIN.O 



[^|reco rd7o 



d 



C. 



^REPLACE 

I^^PRELIB, ,1,S 
/^EQUIP, 55 =MT, 01 =MT 

JOB 



^SEQUENCE 
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